Microsoft 365 Array

ShrekL · 24 Janvier 2021

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 :

VB:

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 :

Code:

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 · 24 Janvier 2021

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

Staple1600 · 24 Janvier 2021

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 · 24 Janvier 2021

Staple1600 à dit:
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 · 24 Janvier 2021

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 · 24 Janvier 2021

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 · 24 Janvier 2021

re
en coup de vent vite fait
exemple

VB:

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

Staple1600 · 24 Janvier 2021

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 · 24 Janvier 2021

re
Oups désolé

ShrekL · 24 Janvier 2021

Staple1600 à dit:
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.

Microsoft 365 Array

ShrekL

XLDnaute Junior

Staple1600

Microsoft 365 - Attribuer une valeur multiple à une variable objet

Staple1600

XLDnaute Barbatruc

Microsoft 365 - Attribuer une valeur multiple à une variable objet

ShrekL

XLDnaute Junior

Microsoft 365 - Attribuer une valeur multiple à une variable objet

Staple1600

XLDnaute Barbatruc

Staple1600

XLDnaute Barbatruc

Microsoft 365 - Attribuer une valeur multiple à une variable objet

patricktoulon

XLDnaute Barbatruc

Staple1600

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

ShrekL

XLDnaute Junior

Microsoft 365 - Attribuer une valeur multiple à une variable objet

Discussions similaires