Hallo zusammen, ich habe folgenden Anwendungsfall: Ich möchte den Inhalt aus einem MS Project Feld in einer speziellen Excel Spalte suchen. Wenn der Wert in Excel gefunden ist, soll er mir einen Wert aus einer bestimmten Spalte in ein MS Project Feld schreiben! Ich kann bis jetzt die Excel öffnen, das wars ;) Vlt kann mir hier jemand helfen. Sub SearcInExcel() Dim objXL As Object Dim objWB As Object Dim objWS As Object Dim xlSheet As Object Dim proj As Project Dim t As Task Dim pj As Project Set pj = ActiveProject Set objXL = CreateObject("Excel.Application") Set objWB = objXL.Workbooks.Open("Testdatei") objXL.Visible = True Set objWS = objWB.Worksheets("Testsheet") Set xlSheet = objWB.Worksheets("Testsheet") End Sub |