Bonjour
La macro réalisé a pour objectif de parcourir des onglets et de commencer à faire des actions que sur des onglets commençant par "toto" par exemple.
Lorsque je réalise le parcours de ces onglets dans une feuille excel le premier onglet commençant par "toto" effectue correctement son action . En revanche lorsque j'entame le 2e onglets l'action s'arrete et m'averti que
"J'ai une erreur 9 :l'indice n'appartient pas à la sélection"
Dans un classeur chaque onglets sont protegé donc j'ai crée une méthode qui leve la protection d'un classeur ceci est fonctionnel.
Voici la manière que j'ai codé pour effectuer le parcours des onglets dans un classeur
Je ne vois pas de quel manière je pourrais me débloquer .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 'afficher les onglets toto Dim Current As Worksheet For Each Current In Worksheets If Left(Current.Name, 5) = "Toto" Then Worksheets(Current.Name).Select // erreur enclenché au deuxieme onglet commençant par Toto. ' réalise un traitement Current.Visible = False //rendre l'onglet invisible Else Current.Visible = False End If Next Current
dans le débugger je constate bien que le programme effectue le parcours des onglets
Je pensais donc à des solutions qui sont de masquer l'onglet un fois que c'est traité . et ensuite j'avais opté à positionner l'instruction ActiveSheet.name en début de traitement mais ceci ne semble pas fonctionner
Si vous avez une idée je suis preneur
Merci
Stardeus
Partager