Excel VBA übertrag in Word mittels Bookmarks

Koksii

Banned
Dabei seit
März 2011
Beiträge
1.996
Ich hab quasi ne Tabelle mit

5 zeilen und 6 Spalten... die ich jeweils in ne Word Tabelle eintragen will mit Bookmarks.

PHP:
ActiveDocument.Bookmarks("name").Range.Select
appword.Selection.TypeText Text:=Range("b26").Value

ActiveDocument.Bookmarks("adresse").Range.Select
appword.Selection.TypeText Text:=Range("b27").Value
So funktionierts aber dann muss ich das 30x schreiben mit unterschiedlichen Werten..

Geht das also irgendwie alles in eine Anweisung (Schleife) rein, damit ich das nicht 30 untereinander schreiben muss?

Habs mal so probiert aber das klappt auch nicht
PHP:
For i = 20 To 24
ActiveDocument.Bookmarks("B" & i).Range.Select
appword.Selection = Range("B" & i).Value
Next


For i = 20 To 24
ActiveDocument.Bookmarks("C" & i).Range.Select
appword.Selection = Range("C" & i).Value
Next


For i = 20 To 24
ActiveDocument.Bookmarks("D" & i).Range.Select
appword.Selection = Range("D" & i).Value
Next


For i = 20 To 24
ActiveDocument.Bookmarks("E" & i).Range.Select
appword.Selection = Range("E" & i).Value
Next


For i = 20 To 24
ActiveDocument.Bookmarks("F" & i).Range.Select
appword.Selection = Range("F" & i).Value
Next
 
Zuletzt bearbeitet:
Dabei seit
Aug. 2011
Beiträge
147
Probier es mal hiermit

ActiveDocument.Tables(1).Cell(Row:=1, Column:=2)
Damit kannst du deine Tabelle, die Reihe und die Spalte mittels Integer Werten auswählen.
 
Top