Microsoft 365 Array

[ShrekL]

Bonjour,

Une question sans doute très simple et je me doute que je risque d'avoir l'air extrêmement "débutant" mais... c'est un peu le cas haha!!!

Merci d'être indulgeant :

J'essai de simplifier une commande :

Sub Enlev_protect()
'
    Sheets("2X1").Unprotect
    Sheets("2X2").Unprotect
    Sheets("2X3").Unprotect
    Sheets("2X4").Unprotect
    Sheets("2X5").Unprotect
    Sheets("2X6").Unprotect
    Sheets("2X7").Unprotect
    
End sub

en :

Sub Enlev_protect_tous_onglets_simplif()
'
    Sheets(Array("2X1", "2X2", "2X3", "2X4", "2X5", "2X6", "2X7")).Unprotect
    
End sub

mais j'ai toujours le message suivant : "L'indice n'appartient pas à la sélection"

Qu'est-ce que je fais de pas correct?

Merci

 

[Staple1600]

Bonjour le fil,

Noel n'est pas si loin pourtant...

Microsoft 365 - Attribuer une valeur multiple à une variable objet

Bonjour, J'ai cherché ici si cette question avait déjà été posée mais je n'ai pas trouvée. Donc, voici ma question en espérant que je ne répète pas trop. Afin de monter des commandes qui s'appliquent à plusieurs feuilles, j'essai de créer une variable objet qui porterait le nom de "ToutBord"...

www.excel-downloads.com

 

[ShrekL]

Bonjour le fil,

Noel n'est pas si loin pourtant...

Microsoft 365 - Attribuer une valeur multiple à une variable objet

Bonjour, J'ai cherché ici si cette question avait déjà été posée mais je n'ai pas trouvée. Donc, voici ma question en espérant que je ne répète pas trop. Afin de monter des commandes qui s'appliquent à plusieurs feuilles, j'essai de créer une variable objet qui porterait le nom de "ToutBord"...

www.excel-downloads.com

Merci de me remémorer par contre la morale de l'histoire était que je voulais attribuer une valeur mutliple à une "variable" de manière à simplifier toutes les formules qui s'appliques à tous mes onglets et on a jamais été capable de le faire.

Maintenant, sans attribuer une "variable", je me disais qu'il devait y avoir moyen de simplement appeler tous mes onglets en une seule ligne avec une formule de type Array?

 

[Staple1600]

Re

une valeur mutliple à une "variable" de manière à simplifier toutes les formules qui s'appliques à tous mes onglets

Quelles formules?

Ton message#1 parle de déprotéger N feuilles.

 

[Staple1600]

Re

=>ShrekL
Dans le discussion que je cite
(et je la cite parce que j'y ai participé)
La solution de mapomme est bien une simplification, non ?

Microsoft 365 - Attribuer une valeur multiple à une variable objet

Bonjour, J'ai cherché ici si cette question avait déjà été posée mais je n'ai pas trouvée. Donc, voici ma question en espérant que je ne répète pas trop. Afin de monter des commandes qui s'appliquent à plusieurs feuilles, j'essai de créer une variable objet qui porterait le nom de "ToutBord"...

www.excel-downloads.com

 

[patricktoulon]

re
en coup de vent vite fait
exemple

Sub test()
Dim x
x = Array("Feuil1", "Feuil2", "Feuil3")
For i = 0 To UBound(x): Sheets(x(i)).Unprotect: Next
End Sub

 

[Staple1600]

Re

=>patricktoulon
Tu n'as pas vu le lien dans le message#2 ?
On a déjà proposé ce type de syntaxe

Attention à tes nerfs

 

[patricktoulon]

re
Oups désolé

 

[ShrekL]

Re

=>ShrekL
Dans le discussion que je cite
(et je la cite parce que j'y ai participé)
La solution de mapomme est bien une simplification, non ?

Microsoft 365 - Attribuer une valeur multiple à une variable objet

Bonjour, J'ai cherché ici si cette question avait déjà été posée mais je n'ai pas trouvée. Donc, voici ma question en espérant que je ne répète pas trop. Afin de monter des commandes qui s'appliquent à plusieurs feuilles, j'essai de créer une variable objet qui porterait le nom de "ToutBord"...

www.excel-downloads.com

Ok... Après plusieurs heures d'essais et erreurs, je réussis à faire "en partie" ce que je voulais faire à partir de la proposition de MaPomme. Je vais donc retourner à ce vieux post pour tenter de m'expliquer mieux ce que je veux faire et compléter mes commandes.