A voir également:
- Existence des feuilles
- Fusionner feuilles excel - Guide
- Comment faire un livret avec des feuilles a4 - Guide
- Excel reporter des données sur une autre feuille avec conditions - Forum Excel
- Reporter une cellule dans une autre feuille avec condition ✓ - Forum Excel
- Comment faire une feuille a3 avec des feuilles a4 ✓ - Forum Matériel & Système
2 réponses
f894009
Messages postés
17185
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
15 avril 2024
1 701
Modifié le 20 avril 2019 à 09:45
Modifié le 20 avril 2019 à 09:45
Bonjour,
une facon de faire, resultat dans MsgBox, a voir pour vous :
une facon de faire, resultat dans MsgBox, a voir pour vous :
Sub recherche_nom_onglet() Dim sh As Worksheet Dim Flg_Ok As Boolean Dim Manque On Error GoTo suite 'erreur si manquante 'boucle sur onglets Donnee For Each sh In Worksheets If sh.Name Like "Donnees*" Then Flg_Ok = False wsh = sh.Range("B3") 'nom onglet If wsh <> "" Then 'un nom If Not IsError(Sheets(wsh)) Then Flg_Ok = True 'existe Else Flg_Ok = True: Manque = Manque & "[B3 vide: " & sh.Name & "]--" 'pas de nom de feuille End If suite: If Not Flg_Ok Then Manque = Manque & "[Pas de feuille: " & wsh & "]--" 'onglet manqant End If End If Next If Manque <> "" Then rep = MsgBox(Manque, , "Nom de feuilles manquantes ou pas de nom de feuilles") End Sub
yg_be
Messages postés
22724
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
25 avril 2024
1 476
20 avril 2019 à 09:46
20 avril 2019 à 09:46
bonjour, tu n'expliques pas vraiment ce que tu veux faire, ni dans quel contexte. et tu ne montres pas ce que tu as déjà réalisé.
moi j'essaierais en faisant une boucle qui parcourt toutes les feuilles.
moi j'essaierais en faisant une boucle qui parcourt toutes les feuilles.
21 avril 2019 à 14:29
Bonne journée.