Tabelle in Textfeld (eingebettete .doc) einfügen
10.03.2004 11:37:44
Anna
Ich komme einfach nicht weiter :-(
Habe in Excel "oBrief" als eingebettetes Word-Objekt.
Worksheets("Brief").OLEObjects("oBrief")
Aus einer Tabelle Worksheets("Export_2")muss ich den Bereich(A1:F & letzte Zeile)
in ein Textfeld "Tabelle" des Word-Objektes "oBrief" einfügen.
Leider klappt es nicht so.
Könntet ihr mir bitte helfen?
Worksheets("Export_2").Activate
ActiveSheet.Range("A1:F" & k2 - 1).Select
Selection.Copy
OLEObjects("oBrief").Object.FormFields.Item("Tabelle").result = ActiveSheet.Paste
Application.CutCopyMode = False
Aufgezeichnetes Makro durch manuelle Durchführung liefert folgendes:
Range("A1:F5").Select
Selection.Copy
Sheets("Brief").Select
ActiveSheet.Shapes("oBrief").Select
Selection.Verb Verb:=xlPrimary
Leider verstehe ich "Verb" nicht:
Selection.Verb Verb:=xlPrimary ' was bedeutet das?
Ich danke für jede Hilfe,
Anna Dell