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


#1

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:


#2

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

#3

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