ich möchte folgendes Makro auf mehrere Tabellenblätter anwenden, in denen die Spalten nach gleichem Kriterium ausgeblendet werden sollen.
Wie funktioniert das?
Gruß,
mika
For i = 1 To 50
If Cells(1, 1) "" Then
If Cells(1, i) Range("a1") Then
Columns(i).EntireColumn.Hidden = True
End If
End If
Next i