hier nochmal der Code von vorhin mit einem anderen Anliegen. Ich möchte gerne die Word Datei die im Code erstellt wird aus einem Eingebetteten Dokument innerhalb der Tabelle kommt. Kann mir jemand sagen was dann in diese Klammern muss die ich Fett markiert habe? Wenn es dann so überhaupt funktioniert? Soweit reichen meine Kenntnisse leider nicht.
Um das eingebettete Objekt handelt sich um das "Objekt1".
Danke schon mal im Voraus
Daniel
Sub rechnung_erstellen()
Dim Rechnung As Object
Dim appWord As Object
Dim NeuerName As String
Dim Dateiname As String
Dateiname_pdf = ThisWorkbook.Path & "/" & Range("AD3").Value & "_Rechnung " & Range("T27") & ".pdf"
Set appWord = CreateObject("Word.Application")
With appWord
Set Rechnung = appWord.Documents.Add(ThisWorkbook.Path & "\Muster Rechnungsschreiben_DB.docx")
With Rechnung...... usw.