ich habe ca. 4000 Zeilen, die ich mit WURZEL(n)+1 markieren möchte
Hierzu habe ich im Archiv folgenden Code gefunden, der eigentlich gut funktioniert.
Sub Jede_zweite_Zeile_markieren()
z = ActiveSheet.UsedRange.Rows.Count
x = """"
For i = 1 To z Step 2
x = x & i & ":" & i & ","
Next i
x = Mid(x & """", 2, Len(x & """") - 3)
Range(x).Select
End Sub
Meine Fragen
1) Wenn ich nun statt step 2 z.b. step 60 eintrage, so wird Excel ( !!) komplett geschlossen ohne jegliche Fehlermeldung
2) Wie bekomme ich die 60 in mein Makro? Die 60 wird im Tabelleblatt auf D1 berechnet
Schon mal vielen Dank
Hermann