ich habe das Problem, dass ich aus Outlook heraus auf eine Exceldatei zugreifen und dort in einer Spalte eine Nummer suchen muss.
Wenn die Nummer gefunden wurde, soll der Inhalt einer anderen Spalte (in der gleichen Zeile) in Outlook verwendet werden.
Den Zugriff auf Excel habe ich mit dem nachfolgenden Code realisiert.
Aber der Find-Befehl funktioniert leider nicht.
Set ExcelApp = CreateObject("Excel.Application")
ExcelApp.Workbooks.Open Filename:="C:\Temp\Testdatei.xlsm"
ExcelApp.Columns("C:C").Select
ExcelApp.Selection.Find(What:="XYZ", After:=ActiveCell, LookIn:=xlFormulas2, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Activate
Hat jemand eine Idee oder Tipp, wo ich schauen könnte?Vielen Dank im Voraus
Rolf