Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Gif nach Word
Autor: Nici
Datum: 30.03.05 14:46
Hallo Zusammen, ich versuche ein Worddokument zu öffnen und an einer Textmarke einen Gif einzusetzen. Mein Code: Private Sub Command1_Click() Dim lobjWord As Word.Application Dim lwrdDoc As Word.Document 'Word erstellen Set lobjWord = CreateObject("Word.Application") Set lwrdDoc = lobjWord.Documents.Add("H:\VB\Word\Vorlagen.dot") 'With lwrdDoc ' .Bookmarks("Name1").Range.Text= "test" ' .SaveAs "H:\VB\Word\Fertig.doc" ' .Close 'End With 'Grafik einfügen 'Selection.InlineShapes.AddPicture FileName:= _ ' "H:\VB\1.jpg", LinkToFile:=False, SaveWithDocument:=True 'Word verlassen/ Prozess beenden lobjWord.Quit Set lwrdDoc = Nothing Set lobjWord = Nothing End Sub Zwar klappt es "test" an der Textmarke einzufügen, aber nicht den Gif. Bitte um Hilfe ! Vielen Dank und Gruß, Nici

Gif nach Word	655	Nici	30.03.05 14:46
Re: Gif nach Word	375	T.i.m.	30.03.05 18:36

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen