column + 1
09.03.2009 14:53:02
Andre
Ich möchte gerne mit Schaltflächen Spalten ein bzw. ausblenden. Für Januar habe ich eine Schaltfläche bereits gebaut und die entsprechenden Spalten eingetragen. Um mir die Arbeit leichter und übersichtlicher zu machen, würde ich gerne die anderen Makros mit Absprungbasis von Januar erstellen
Es muss doch möglich sein, nur noch +1 für Februar +2 für März für die Spalten selektion einzugeben.
Hier ein Teil meiner Makro für Januar, für Februar möchte ich nicht Column("E") anzugeben, sondern nur noch E +1 :
Sub Januar_click()
With Januar
If .Value Then
Columns("D").Select
Selection.EntireColumn.Hidden = False
Else
Columns("D").Select
Selection.EntireColumn.Hidden = True
End If
End With
Range("C181").Select
End
Sub
Hoffe, dass einer mein Problem versteht.
Gruss
Andre