✅ Sélectionner l'ensemble des lignes impaires (ou paires)

Bonjour,
Comment faire pour sélectionner en une seule fois toutes les lignes impaires par exemple?
Merci d’avance et merci de nous partager toutes ces bonnes astuces excel :slightly_smiling_face:

Bonjour, pour sélectionner rapidement les lignes paires ou impaires, le plus rapide est de passer par une Macro VBA.
Il suffit d’utiliser le code ci-dessous pour sélectionner les lignes paires avec la macro Selection_Paire et vice versa

Sub Selection_Paire()
lignemin = InputBox("Selectionner les lignes paires depuis la ligne")
lignemax = InputBox("Selectionner les lignes paires jusqu'a la ligne")

Dim maSelection As Range
Dim ligne As Range
Set ligne = ActiveSheet.Rows(1)
Set maSelection = Rows(lignemin + (lignemin Mod 2))
For i = lignemin To lignemax:
 If (i Mod 2 = 0) Then
 Set ligne = Rows(i)
 Set maSelection = Application.Union(maSelection, ligne)
 maSelection.Select
 End If
Next i
maSelection.Select
 
End Sub
Sub Selection_imPaire()
lignemin = InputBox("Selectionner les lignes impaires depuis la ligne")
lignemax = InputBox("Selectionner les lignes impaires jusqu'a la ligne")

Dim maSelection As Range
Dim ligne As Range
Set ligne = ActiveSheet.Rows(1)
Set maSelection = Rows(lignemin + 1 - (lignemin Mod 2))
For i = lignemin To lignemax:
 If (i Mod 2 = 1) Then
 Set ligne = Rows(i)
 Set maSelection = Application.Union(maSelection, ligne)
 maSelection.Select
 End If
Next i
maSelection.Select

End Sub

Grand merci DocteurExcel, you make my day :slight_smile: !

1 « J'aime »

Bonjour!!
j’ai besoin d’un peu plus d’infos sur ces codes… où doit-on les copier? Les quels exactement?

Merci pour votre réponse.

mathilde