[Visual Basic] Etwas auf die Excel Arbeitsmappe schreiben?

...komplette Frage anzeigen

1 Antwort

Unter welchem Objekt hast du denn deinen Code programmiert? (Modul, Klasse, Arbeitsmappe, Tabelle,...)

Function33
msgbox "fertig"
Sub Function33 Dim oExcel Dim oWBSet oExcel = CreateObject("Excel.Application") oExcel.Visible = True Set oWB = oExcel.Workbooks.Open("E:\tmp\xxxx.xlsx") oWB.Sheets("Tabelle2").Range("A1").Value = "H3CO" End Sub
0
@Suboptimierer

Hi, danke für deine Hilfe 

Es ist ein Modul das zu der Arbeitsmappe in die ich reinschreiben will dazugehört. Habe den Code mal ausprobiert aber es klappt irgendwie nicht. Trotzdem danke

0
@Zetesafe

Mein Code ist als Visual Basic Script gedacht, so wie du es in der Frage erwähnt hast. 

"...wenn diese Funktion in meinem Visual Basic Script aufgerufen wird..."

Du hast anscheinend das Wort Script verwendet, ohne zu wissen, dass es einen erheblichen Unterschied macht.

Dann probiere folgendes im Modul:

Sub Function33() 
 ThisWorkbook.Sheets("Tabelle2").Range("A1").Value = "H3CO"
End Sub
0

Was möchtest Du wissen?