Problème de nom de feuille [VBA]
Résolu/Fermé
mimi_1990
Messages postés
75
Date d'inscription
jeudi 1 juillet 2010
Statut
Membre
Dernière intervention
15 novembre 2010
-
21 juil. 2010 à 14:44
mimi_1990 Messages postés 75 Date d'inscription jeudi 1 juillet 2010 Statut Membre Dernière intervention 15 novembre 2010 - 21 juil. 2010 à 15:24
mimi_1990 Messages postés 75 Date d'inscription jeudi 1 juillet 2010 Statut Membre Dernière intervention 15 novembre 2010 - 21 juil. 2010 à 15:24
A voir également:
- Problème de nom de feuille [VBA]
- Nom de l'adresse - Forum Consommation & Internet
- Trouver une adresse avec un nom de famille gratuit ✓ - Forum Mobile
- Feuille de pointage excel - Télécharger - Tableur
- Trouver un nom avec une adresse ✓ - Forum Loisirs / Divertissements
- Le nom du champ de tableau croisé dynamique n'est pas valide ✓ - Forum Excel
2 réponses
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 744
21 juil. 2010 à 15:00
21 juil. 2010 à 15:00
Bonjour,
1ère question : Quelque soit son nom, Feuil3 ou synthese ou peu importe, les feuilles excel sont également répertoriées sous VBA par leur numéro. regarde les noms qui apparaissent en haut à gauche dans la fenêtre Visual Basic :
Feuil1(Feuil1)
Feuil2(Feuil2)
Feuil3(Feuil3)
Après avoir renommé ta feuille3 tu as :
Feuil1(Feuil1)
Feuil2(Feuil2)
Feuil3(synthèse)
Suffit donc de toujours appeler ta 3ème feuille par son numéro soit :
Sheets(3)
au lieu de Sheets("Feuil3") ou Sheets("synthese")
2ème question : Un test en début de macro, un peu comme ceci :
1ère question : Quelque soit son nom, Feuil3 ou synthese ou peu importe, les feuilles excel sont également répertoriées sous VBA par leur numéro. regarde les noms qui apparaissent en haut à gauche dans la fenêtre Visual Basic :
Feuil1(Feuil1)
Feuil2(Feuil2)
Feuil3(Feuil3)
Après avoir renommé ta feuille3 tu as :
Feuil1(Feuil1)
Feuil2(Feuil2)
Feuil3(synthèse)
Suffit donc de toujours appeler ta 3ème feuille par son numéro soit :
Sheets(3)
au lieu de Sheets("Feuil3") ou Sheets("synthese")
2ème question : Un test en début de macro, un peu comme ceci :
Dim Ws As Worksheet Dim test, test1 As String test = "" test1 = "" For Each Ws In ThisWorkbook.Worksheets If Ws.Name = "Réel" Then test = "OK" ElseIf Ws.Name = "Théorique" Then test1 = "OK" End If Next Ws If test <> "OK" Then MsgBox " veuillez au préalable importez un fichier Réel" Exit Sub End If If test1 <> "OK" Then MsgBox " veuillez au préalable importez un fichier Théorique" Exit Sub End If
mimi_1990
Messages postés
75
Date d'inscription
jeudi 1 juillet 2010
Statut
Membre
Dernière intervention
15 novembre 2010
15
21 juil. 2010 à 15:24
21 juil. 2010 à 15:24
c'est nickel merci beaucoup tout fonctionne désormais !