VBA - sélectionner toutes les feuilles
Fermé
jofu123
Messages postés
1
Date d'inscription
samedi 6 mars 2010
Statut
Membre
Dernière intervention
6 mars 2010
-
6 mars 2010 à 17:41
Mike-31 Messages postés 18318 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 26 avril 2024 - 7 mars 2010 à 09:27
Mike-31 Messages postés 18318 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 26 avril 2024 - 7 mars 2010 à 09:27
A voir également:
- VBA - sélectionner toutes les feuilles
- Fusionner feuilles excel - Guide
- Selectionner plage jusqu'à la dernière cellule non vide vba - Forum VB / VBA
- Find vba - Astuces et Solutions
- Incompatibilité de type vba ✓ - Forum Programmation
- Sélectionner texte pdf - Guide
1 réponse
Mike-31
Messages postés
18318
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
26 avril 2024
5 079
7 mars 2010 à 09:27
7 mars 2010 à 09:27
Salut,
Regardes ce code à coller dans un module et associer à un bouton ou coller dans un contrôle
Sub test()
nom = ("Feuil_test") 'nom de la feuille à ne pas sélectionner
ReDim feuils(ThisWorkbook.Sheets.Count - 2)
X = 0
For Each feuil In ThisWorkbook.Sheets
If feuil.Name <> nom Then
feuils(X) = feuil.Name
X = X + 1
End If
Next
Sheets(feuils).Select
End Sub
Regardes ce code à coller dans un module et associer à un bouton ou coller dans un contrôle
Sub test()
nom = ("Feuil_test") 'nom de la feuille à ne pas sélectionner
ReDim feuils(ThisWorkbook.Sheets.Count - 2)
X = 0
For Each feuil In ThisWorkbook.Sheets
If feuil.Name <> nom Then
feuils(X) = feuil.Name
X = X + 1
End If
Next
Sheets(feuils).Select
End Sub