i= 10; Ich würde gerne die Spalten (2:i) also B bis J ausblenden.
Gibt es etwas wie comumns(2:i)?
Vielen Dank im Voraus
Sub weg_damit()
Dim i As Integer
i = 10
Range(Cells(1, 2), Cells(1, i)).EntireColumn.Hidden = True
End Sub
Sub test()
Dim i As Variant
Columns.Hidden = False
i = InputBox("", "Bitte Zahl eingeben (größer 2)!")
If i > 2 And IsNumeric(i) Then Range(Columns(2), Columns(i)).Hidden = True
End Sub
Sub test()
Dim i As Integer
Columns.Hidden = False
i = InputBox("", "Bitte Zahl eingeben (größer 2)!")
If i > 2 And IsNumeric(i) Then
Range(Cells(1, 2), Cells(1, i)).EntireColumn.Hidden = True
End If
End Sub