Ich möchte innerhalb einer sehr grossen excel-liste jede zweite zeile ausblenden. wie kann ich also automatisch jede zweite zeile markieren!?
Danke
ein surfer
Office - Word, Excel und Co. 9.703 Themen, 40.813 Beiträge
Hallo Anonym,
vielleicht hilft dieses Makro weiter:
Sub Jede_2te_Zeile_markieren()
'
' Makro zum Markieren jeder 2. Zeile
' funktioniert nur bis ca. 90 Zeilen
' ----------------------------------
If Selection.Rows.Count > 1 Then
ystart = Selection.Rows.Row + 1
yend = ystart + Selection.Rows.Count - 2
s$ = ""
For i = ystart To yend Step 2
If i > ystart Then
s$ = s$ + ","
End If
s$ = s$ + Format$(i) + ":" + Format$(i)
Next i
Range(s$).Select
End If
End Sub
einfach die gewünschten Zeilen mit der Maus als Ganzes markieren und das obige Makro aufrufen. Danach ist jede 2te Zeile markiert.
m.f.G. HGP