ich habe auf mehreren Tabellenblättern einen Button, der die gleichen 3 Makros abruft. Beim ersten Mal funktionieren alle Makros. Beim zweiten Klicken (egal auf welchem Blatt) erhalte ich den Laufzeitfehler 1004, kann mir aber nicht erklären, warum. Die Tabellenblätter sind von der Struktur alle gleich.
Wer kann helfen?
Danke!
Sub leereBriefeAusblenden()
Dim i As Long
Application.ScreenUpdating = False
For i = 9 To 201 Step 6
Cells(7, i).MergeArea.EntireColumn.Hidden = Cells(6, i).Value = 0
Next i
Application.ScreenUpdating = True
End Sub