Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

=EINBETTEN("Word.Document.8";"")

Forumthread: =EINBETTEN("Word.Document.8";"")

=EINBETTEN("Word.Document.8";"")
29.11.2007 15:11:00
Uwe
Hallo an Alle,
mich beschäftigt schon seit längerem folgendes Problem......
Aus Excel heraus ein Worddoc zu öffnen und an eine Textmarke verweisen, davon gibts genug in der Recherche zu finden.
Aber wie ist das mit einem eingebetteten Worddoc auf Tabelle2 z.b.
Sagen wir mal in Tabelle 1 Zelle A1 den Inhalt an eine Textmarke an das eingebettete Word.Document in Tabelle2 einfügen.
Geht sowas per Code überhaupt.
Der Macrorecorder hat da keine vernünftige Ergebnisse erziehlt.
Für Eure Mühen schon mal Dank!
Gruß Uwe

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: =EINBETTEN("Word.Document.8";"")
30.11.2007 01:21:46
fcs
Hallo Uwe,
eine der beiden folgenden Code-Varianten fügt Text an einer Textmarke eines eingebetteten Word-Objekts ein. Dabei bevorzuge ich die Variante mit den Objekt-Variablen. Getestet unter MS Office97.
Gruß
Franz

Sub TextanWordobjectTextmarke()
'Text an einer Textmarke in einem eingebetteten Wordobjekt einfügen
'im Excel-VBA-Editor muss unter Extras - Verweise die _
Microsoft Word x.y Object Library  aktiviert werden.
Dim dokObject As Object, Bereich As Word.Range, strText As String
Dim wks As Worksheet
Set wks = Worksheets("Tab2")
strText = Worksheets("Tab1").Range("A1").Text
Set dokObject = wks.Shapes("Objekt 1").OLEFormat.Object
With dokObject
Set Bereich = .Object.Bookmarks("Textmarke1").Range
Bereich.Text = strText
End With
End Sub
Sub TextanWordobjectTextmarke2()
'Text an einer Textmarke in einem eingebetteten Wordobjekt einfügen
Worksheets("Tab2").Shapes("Objekt 1").OLEFormat.Object.Object.Bookmarks("Textmarke1") _
.Range.Text = Worksheets("Tab1").Range("A1").Text
End Sub


Anzeige
AW: =EINBETTEN("Word.Document.8";"")
30.11.2007 08:49:00
Uwe
Hallo Franz,
es macht doch immer wieder Spass von Dir zu lesen! :-)
Hab es gerade mal getestet nur das beste ist mal wieder......ich verstehe es sogar :-)
Also genau das was ich mir vorgestellt hatte.
Vielen Dank für deine Hilfe!
Gruß Uwe
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige