VBA-Versionsproblem Excel 97/2000
17.11.2004 10:40:00
RaulRivaldo
ich verwende den u.a. Code, um mit einer Schaltfläche zwei Makros auszuführen. Dies funktioniert unter Excel 2000 ohne Probleme. Im Büronetzwerk, wo nur Excel 97 installiert ist, bekomme ich nach Klick auf den Button die Fehlermeldung:
"Die Hidden-Eigenschaft des Range-Objekts kann nicht festgelegt werden."
Der Debugger markiert die Zeile mit "Rows(n).Hidden = blend" im Code.
Ist dieser Code bei Excel 97 nicht ausführbar? Wüßte jemand, wie ich den Code umschreiben muß, damit er unter beiden Excel-Versionen funktioniert?
Dank im voraus,
Raúl
Private Sub CommandButton1_Click()
Dim blend As Boolean
Const zellein As String = "Zellen einblenden"
Const zellaus As String = "Zellen ausblenden"
With CommandButton1
If .Caption = zellein Then
.Caption = zellaus
blend = False
Else
.Caption = zellein
blend = True
End If
End With
Dim n As Integer
For n = 1 To 10
Rows(n).Hidden = blend
Next
End Sub