Office: (Office 2013) Word Tabellen mit VBA ansprechen

Hallo,

mit VBA kann ich auf Tabellen(zellen) im Word zwar zugreifen, aber nur mit deren Index (Reihenfolge) im Dokument, z.B. die 2. Tabelle: .Tables(2) .
Ich habe nun mehrere Tabellen im Dokument, die mit diversen VBA-Skripten ausgewertet werden. Wenn ein User versehentlich eine Tabelle löscht, gerät die ganze Zählung und damit das korrekte Ausführen meiner Skripte durcheinander. Klar kann man z.B. auch Teile der Tabelle vor dem Löschen sperren, aber dann gehen wieder andere Sachen nicht.
Kann man denn nicht einer Tabelle z.B. einen Namen zuordnen und dann über diesen Namen auf die Tabelle zugreifen?
Oder welche anderen Möglichkeiten mit VBA hätte ich noch, den Zugriff auf eine Word-Tabelle eindeutig zu gestalten?

Vielen Dank bereits.

stb122

:)

 

Hallo stb,

du kannst den Tabellen Titel verleihen (Tabelleneigenschaften > Registerkarte Alternativtext > Titel. Da zwei Tabellen den gleichen Titel haben können, muss man ggf. aufpassen, wenn man eine Tabelle kopiert. Auf die betitelte Tabelle kannst du so zugreifen:
Code:

 

Hallo Gerhard,

wie das immer ist - nach einem "Name" oderso für die Tabelle habe ich gesucht und gesucht ... aber auf einen "Titel" bin ich nicht gekommen ...

Werde ich also auf jeden Fall probieren.

Danke für Deine (wie immer) kompetente Hilfe! *wink.gif*

stb122

 

Word-Tabellen ansprechen
Word-Tabellen besitzen keine aussagekräftigen Namen und können in VBA nur über die Indexauflistung (beginnt bei 1) angesprochen werden. Es ist auch nicht möglich nachträglich über VBA einer Tabelle einen Namen zuzuordnen. Besteht in einem Dokument die Möglichkeit dass nachträglich noch weitere Tabellen eingefügt werden (evtl. vor die bereits bestehenden), so sollte man Textmarken einsetzen um so immer auf die gewünschte Tabelle zugreifen zu können.
Die Textmarke kann an einer beliebigen Position innerhalb der betreffenden Tabelle platziert werden. Egal in welcher Zeile, Spalte bzw. Zelle sich die Textmarke befindet, repräsentiert die Textmarke immer die gesamte Tabelle !!

Tabellen über Textmarke ansprechen
Das Auffinden einer bestimmten Tabelle über deren Index ist nicht sicher, da sich der Index ändern kann wenn dem Dokument eine neue Tabelle hinzugefügt wird – bzw. wenn Tabellen gelöscht werden.
Da eine Tabelle keinen eindeutigen Namen besitzt – und man auch nicht nachträglich mit VBA einer Tabelle einen Namen zuweisen kann – empfiehlt sich stattdessen der Umweg über Textmarken, über die man sehr einfach auf eine bestimmte Tabelle zugreifen kann.
Das Ansprechen einer kompletten Tabelle über eine Textmarke kann wie folgt geschehen:
Code:

(Auszug aus einem Script von Smaug)