Wo liegt der Fehler?
25.04.2003 10:14:26
Vera
Dim Datei As Workbook
Dim l As Integer
For l = 1 To 6
Set Datei = Workbooks("Ausw_Spiell_00" & l & ".xls")
Dim SpalteA As Range
SpalteA = Workbooks(Datei).Worksheets("Tabelle1").Range("A1:A15")