Discussion :

[CCRNP]

Salut,

Comment faire t'on pour sélectionner toutes les feuilles d'un classeur comprises entre la deuxième et l'avant dernière ?

Merci

A+

[SfJ5Rpw8]

voila :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim i As Integer
 For i = 2 To Sheets.Count - 1
  Sheets(i).Select (i = 2)
 Next
End Sub

.. Attention à l'astuce ... (i=2)...
.Select(true) remplace la sélection en cours
.Select(false) rajoute à sélection en cours.