Makro läuft auf XP nicht
10.01.2006 10:55:25
Louis
ich habe auf excel2003 einen kleinen Makro geschrieben
Private Sub Test_Click()
Rows("11:15").Copy
a = 16
SucheLeer:
If Cells(a, 1).Value = "" Then
Cells(a, 1).PasteSpecial
Application.CutCopyMode = False
Else
a = a + 1
GoTo SucheLeer
End If
With Range(Cells(a, 5), Cells(a, 11)).Borders(xlEdgeTop)
.LineStyle = xlDot
.Weight = xlThin
.ColorIndex = 17
End With
b = a + 2
Cells(b, 6).Select
Übungen.Show
End Sub
wenn ich diesen nun unter excelXP laufen lasse wird mir die erste Variablendeklaration a = 16 als Fehler angezeigt:
Findet die ObjektBibliothek nicht. Laut Hilfe soll ich die Verweise neu deklariern. Das kapier ich aber nicht.
Kann mir jemand helfen?
Danke schon im vorraus
Louis
Anzeige