Aber ich werde noch das vorgeschlagene Prozedere machen und dann schauen was rauskommt.
Schadet sicher nicht.
Workbooks("Test").Sheets("2").Range("A1").Value = "Funktioniert"
Vorschlag:
Wenn die Arbeitsmappe "Test" nicht gespeichert ist, funktioniert es nicht.
Falls doch, dann den Zusatz .xlsx (oder was Du hast) anängen
Workbooks("Test.xlsx").Sheets("2").Range("A1").Value = "Funktioniert"
Wenn Dein Code in derseloben Mappe ist, dann genügt auch:
ThisWorkbook.Sheets("2").Range("A1").Value = "Funktioniert"
Wenn der Fehler immernoch besteht, dann :
a) Gibt es kein Sheet() mit dem Namen "2"
b) Oder Sheet("2") gibt es, ist aber kein Arbeitsblatt(Worksheet) sondern ein Diagrammblatt
Also versuche:
ThisWorkbook.Worksheets("2").Range("A1").Value = "Funktioniert"
|