Selection de feuilles
Tonin39
Messages postés
75
Date d'inscription
mercredi 6 avril 2005
Statut
Membre
Dernière intervention
2 avril 2006
-
22 avril 2005 à 14:30
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 - 22 avril 2005 à 19:05
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 - 22 avril 2005 à 19:05
A voir également:
- Selection de feuilles
- Erreur d'execution 9 l'indice n'appartient pas à la selection - Forum VBA Office (Excel, Word ...)
- Une seule expression peut être spécifiée dans la liste de sélection quand la sous-requête n'est pas introduite par exists. ✓ - Forum SQL
- Code selection - Forum Visual Basic
- La cellule ou le graphique que vous essayez de modifier se trouve sur une feuille protégée - Forum Visual Basic 6
- Javascript selection - Forum Javascript / DHTML
1 réponse
cs_CanisLupus
Messages postés
3757
Date d'inscription
mardi 23 septembre 2003
Statut
Membre
Dernière intervention
13 mars 2006
21
22 avril 2005 à 19:05
22 avril 2005 à 19:05
Un tit exemple :
Sub truc()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Sheets
Select Case UCase(Left$(ws.Name, 1))
Case "A"
'code pour "a" ou "A"
Case "B"
'code pour "b" ou "B"
'etc ....
End Select
Next
End Sub
Loup Gris
Sub truc()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Sheets
Select Case UCase(Left$(ws.Name, 1))
Case "A"
'code pour "a" ou "A"
Case "B"
'code pour "b" ou "B"
'etc ....
End Select
Next
End Sub
Loup Gris
