motiviert durch erste Erfolge im verbessern von Makrorecorder-Codes habe ich mein erstes Makro komblett "per Hand" geschrieben. In Modul 1 steht:
Sub EinAusBlenden()
If Rows("23:85").EntireRow.Hidden = True Then
Rows("23:85").EntireRow.Hidden = False
Else
Rows("23:85").EntireRow.Hidden = True
End If
End Sub
und funktioniert auch so wie es soll. Zwecks benutzerfreundlichkeit habe ich jetzt in Tabelle 1 einen Commandbutton erstellt:
Private Sub CommandButton2_Click()
Application.Run ("EinAusBlenden")
End Sub
Ein Click auf diesen führt nun zu der Fehlermeldung "Laufzeitfehler '1004': Die Hidden-Eigenschaft des Range-Objektes kann nicht festgelegt werden."
Warum? Großes Fragezeichen - der Button macht doch nichts weiter als das Makro aufzurufen, und wenn ich es selbst aufrufe funktioniert es ohne weiteres!
Bitte um Erleuchtung,
Dank und Gruß,
Klaus M.