Datei und Sheetsname als Variable einsetzen
29.09.2005 20:53:48
Egon
Wer kann mir helfen?
Ich möchte wb als "Abkürzung" vor dem Code benutzen (weil der lange Dateiname sich öfters ändert, z.B. Stufenprotokoll_Stufe_400_rev_26447)
Die Variable wb sollte in allen Tabellen verfügbar sein.
Noch besser wäre der Dateiname und der Tabellenname als wb.Range("A1").value=5
Dim wb As String
Sub test()
wb = ThisWorkbook.Name
wb.Worksheets("Schicht").Range("A1").Value = 100 !!!!!! hier Fehlermeldung
MsgBox wb
End Sub
Danke im Voraus
Egon
Anzeige