Office: (Office 2010) Cursorposition festlegen

Hallo zusammen,

in einem Word-2010 Dokument, habe ich ein Formular mit Steuerelementen "Nur Text" erstellt. Nun möchte ich, dass beim Öffnen dieser Datei (dotm), der Cursor im ersten Steuerelement steht. Mit einem Makro habe ich es schon probiert; es aber nicht hinbekommen (in Sachen VBA bin ich absolut kein Genie). Dabei muss man eine Textmarke setzen; kann diese Textmarke aber leider nicht in das Steuerelement setzen. Die Schaltfläche dafür, kann ich nicht drücken.
Weiß jemand, wie ich das Problem mit der Cursorposition lösen kann?
Habe mal noch die Datei, zwar etwas gekürzt bzw. entfremdet, angehängt.
Für Eure Hilfe bin ich Euch dankbar.

Gruß
Nicki

:)

 

Hi,

die zwei Zeilen, mit denen du in das erste Inhaltssteuerlement kommst, lauten:

Code:

Ob du damit schon am Ziel bist, weiß ich nicht. Musst dich ggf. nochmal melden.

Gruß
TT

 

Das Makro kann ich ausführen. Allerdings sollte es automatisch beim öffnen der Datei ausgeführt werden. Hast du hierzu noch eine Idee?

Vielen Dank schon mal.

 

Dazu brauchst du eine Prozedur namens
Code:

Die steht dann nicht - wie dein bisheriger Code - in Module1, sondern unter "Microsoft Word Objects > ThisDocument".

Da kopiert du die beiden Zeilen rein, die ich dir schon geschickt habe,

Gruß
TT

 

Das hab ich nun soweit hinbekommen. Sobald ich die dotm-Datei öffne, startet der Cursor nun im Steuerelement "Ortsnetz". Da es aber eine Vorlagendatei ist und beim Doppelklick auf die Datei natürlich ein neues Dokument im docx Format erzeugt wird, funktioniert das automatische Setzen des Cursors nicht mehr.

Mein Code sieht folgender maßen aus:

Code:

Vielen Dank schon mal, dass du mich dahin geführt hast.

 

Tja, ist eben ein Unterschied, ob etwas beim Öffnen einer Datei geschehen soll, oder aber beim Erstellen einer neuen Datei von Vorlage *boah .

Dafür brauchst du das 'Document_New()'. Also einfach den _Open Code kopieren, wieder in ThisDocument einfügen und aus dem 'Open' ein 'New' machen. Dann hast du beide Varianten abgedeckt: Datei öffnen und Datei neu.

TT

 

Super, vielen Dank. Das hab ich nun gecheckt. Es funktioniert.

Ich lass das Thema noch als offen stehen, falls doch noch Änderungen an dem Dokument gewünscht werden.


Vielen Dank *biggrin.gif*