Manipuler les onglets

Salut,

J'ai un classeur Dossier_travaux dans lequel des cellules de l'onglet Récap contiennent les noms des onglets du classeur Dossier_avion. J'ai besoin de lancer des routines sur les onglets du classeur Dossier_avion.

J'ai :

Dim WS as Worksheet

Set WS = Workbooks(Dossier_travaux).Sheets(Workbooks(Dossier_travaux).Sheets("Récap").Cells(Ligne_récap, 7))

Workbooks(Dossier_avion).Sheets(WS).Unprotect

Mais impossible de donner une valeur à WS, alors que l'expression en gras donne bien le nom de l'onglet que je veux sélectionner.

J'ai essayé aussi sans le Set ou en ne définissant WS qu'avec l'expression en gras, ça ne marche pas mieux.

Si vous avez la solution, je suis preneur.

Merci d'avance.

Manu

et ceci ?

Set WS = Workbooks("Dossier_travaux").Sheets(Workbooks("Dossier_travaux").Sheets("Récap").Cells(Ligne_récap, 7))

avec des guillemets !

Non, Dossier_travaux est une variable. Désolé j'avais pas précisé.

Manu

Bonjour,

je ne suis pas très fort mais si Ws est une worksheets, alors cela me chiffonne :

Workbooks(Dossier_avion).Sheets(WS).Unprotect

Par contre si WS était un String :

Dim WS as String
WS = Workbooks(Dossier_travaux).Sheets("Récap").Cells(Ligne_récap, 7)
Workbooks(Dossier_avion).Sheets(WS).Unprotect

Pas essayé...

@ bientôt

LouReeD

Bon ben j'ai pas compris.

Je suis revenu à ma première solution (WS bêtement défini comme string), et cette fois ça a marché...

Merci quand même...

Manu

et ceci ?

WS.Unprotect

après tests ...

feuille = Workbooks(Dossier_travaux).Sheets("Récap").Cells(Ligne_récap, 7)
Dim WS As Worksheet
Set WS = Workbooks(Dossier_travaux).Sheets(feuille)
WS.Unprotect

Re

Bonjour,

je ne suis pas très fort mais si Ws est une worksheets, alors cela me chiffonne :

Workbooks(Dossier_avion).Sheets(WS).Unprotect

Par contre si WS était un String :

Code : Tout sélectionner

Dim WS as String

WS = Workbooks(Dossier_travaux).Sheets("Récap").Cells(Ligne_récap, 7)

Workbooks(Dossier_avion).Sheets(WS).Unprotect

Pas essayé...

@ bientôt

LouReeD

puis :

par Manu31 » Aujourd’hui, 16:04

Bon ben j'ai pas compris.

Je suis revenu à ma première solution (WS bêtement défini comme string), et cette fois ça a marché...

Merci quand même...

Manu

Donc en fait vous êtes revenu sur votre première solution... c'était la mienne également, c'est pourquoi à mon tour je ne comprend pas le : "Bon ben j'ai pas compris."

@ bientôt quand même

LouReeD