ich bin am Ende mit meinem Latein. Ich habe überall gegoogelt und gesucht - aber nichts gefunden.
Was möchte ich machen?
Ich habe eine HTML-Mail inOutlook, aus der ich bestimmte Inhalte extrahiert habe. Sie liegen als String Name vor. Durch starten eines Makros öffnet sich eine die Excel-AnwendungTemplate.xls, in der ein Userform1 geöffnet wird und der Text in die Textbox1 eingefügt wird.
Dies ist alles was ich habe (habe ich aus der Outlook-Hilfe kopiert):
Sub GetExcel()
Dim XL1 As Object
Dim Name as string
On Error Resume Next
Name = "Muster"
Set XL1 = GetObject(, "Excel.Application")
If Err.Number 0 Then ExcelLiefNicht = True
Err.Clear ' Err-Objekt im Fehlerfall löschen.
Set XL1 = GetObject("D:\Template.xls")
With XL1.Application
.Visible = True
'hier beginnen meine Versuche
.userform1.show
.userform1.AA_TB_Bem = Name ' Textbox AA_TB_Bem mit dem wert von Name füllen
' und hier enden sie schon wieder
XL1.Parent.Windows(1).Visible = True
End With
Set XL1 = Nothing ' Verweis auf Anwendung und
' Tabelle freigeben.
End Sub
Ausser, dass Excel die richtige Tabelle öffnet passiert nichts. Hat da jemand eine Idee?
Gruß
Eberhard