Comment nommé un "sheets" dans VBA par l'intermédiaire d'une cellule excel

[Yannnnick]

Bonjour à tous,

Je souhaite modifier cette formule :

Set ws1 = ThisWorkbook.Sheets("Var_FTE_LE2011.09")

Pour que la partie ("Var_FTE_LE2011.09") ne soit plus entrée en dur mais que je puisse la modifier via une cellule excel.
Car j'ai fait cette macro pour des utilisateurs et je ne veux pas qu'ils soient obligés de rentrer dans la macro quand le nom de l'onglet est différent.

Merci pour votre aide

Yannick

 

[Robert]

Re : Comment nommé un "sheets" dans VBA par l'intermédiaire d'une cellule excel

Bonjour Yannick, bonjour le forum,

Regarde ici la formule proposée pa Modeste.

 

[néné06]

Re : Comment nommé un "sheets" dans VBA par l'intermédiaire d'une cellule excel

Bonjour Yannnnick

*A essayer
Remplacer
Set ws1 = ThisWorkbook.Sheets("Var_FTE_LE2011.09")
Par
Set ws1 = ThisWorkbook.Sheets(cells(ligne,colonne).value)

Edit Bonjour Robert

A+

 

[Yannnnick]

Re : Comment nommé un "sheets" dans VBA par l'intermédiaire d'une cellule excel

Merci à tous les deux pour cette réactivité. Je test et je vous tiens au courant si cela à marché.

Encore merci

 

[Yannnnick]

Re : Comment nommé un "sheets" dans VBA par l'intermédiaire d'une cellule excel

ça marche!!!!

merci et bonne journée