hab eine Frage. mit welchem befehl kann ich jede zweite spalte beginnend ab spalte h markieren?
danke!
Sub Markiere()
Const sp_1 = 8 'erste Spalte
Const sp_2 = 30 'letzte Spalte
Dim sp As Integer
Dim SP_rng As Range
Set SP_rng = Columns(sp_1)
For sp = sp_1 To sp_2 Step 2
Set SP_rng = Union(Columns(sp), SP_rng)
Next sp
SP_rng.Select
End Sub