Un select case avec "erreur 438"
Fermé
adamfred
Messages postés
11
Date d'inscription
lundi 10 juin 2013
Statut
Membre
Dernière intervention
4 juillet 2013
-
24 juin 2013 à 19:22
adamfred Messages postés 11 Date d'inscription lundi 10 juin 2013 Statut Membre Dernière intervention 4 juillet 2013 - 25 juin 2013 à 17:14
adamfred Messages postés 11 Date d'inscription lundi 10 juin 2013 Statut Membre Dernière intervention 4 juillet 2013 - 25 juin 2013 à 17:14
A voir également:
- Un select case avec "erreur 438"
- Erreur 0x80070643 - Accueil - Windows
- Erreur 0x80070643 Windows 10 : comment résoudre le problème de la mise à jour KB5001716 - Accueil - Windows
- Aller à la ligne dans une case excel - Guide
- Erreur 1001 outlook - Accueil - Bureautique
- Erreur 3005 france tv - Forum Lecteurs et supports vidéo
2 réponses
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
Modifié par Patrice33740 le 24/06/2013 à 22:19
Modifié par Patrice33740 le 24/06/2013 à 22:19
Je ne vois pas trop l'intérêt de ce code mais bon ... :
Cordialement
Patrice
Dim mySheet As Worksheet Dim m As Integer For m = 1 To 8 Set mySheet = Worksheets(m) Select Case mySheet.Name Case "Recap Fr", _ "Recap Angl", _ "Récap prim FR", _ "Récap Prim Angl", _ "Récap Maternelle Angl", _ "Recap Maternelle Fr" mySheet.Select End Select Next m
Cordialement
Patrice
adamfred
Messages postés
11
Date d'inscription
lundi 10 juin 2013
Statut
Membre
Dernière intervention
4 juillet 2013
2
25 juin 2013 à 17:14
25 juin 2013 à 17:14
merci, c'était l'erreur