Blattname einer Function übergeben
26.06.2002 08:11:37
Horst
Ich muss einer Function einen Tabellenblattnamen und einen Zellenwert übergeben. (Der Zellenwert funktioniert !)
Die Funktion rufe ich auf mit: Fehltage(Test,C1)
-----------------------------------------------------------
Function Fehltage(Tab_Name As String, Zelle As Range)
'Dies funktioniert nicht!
arr_Tag = Worksheets(Tab_Name).Range("A9:D400")
'Dies funktioniert
arr_Tag = Worksheets("Test").Range("A9:D400")
Kann mir jemand sagen, was ich falsch mache ?
Wie muss ich Tab_Name richtig deklarieren ?
Danke im Voraus
Gruß Horst
Anzeige