gibt es eine Möglichkeit alle versteckten Spalten irgendwie generell zu löschen?
Gruss
Claudia
Public Sub versteckte_loeschen()
Dim int_index As Integer
For int_index = 256 To 1 Step -1
If Columns(int_index).Hidden Then Columns(int_index).Delete
Next
End Sub