Variabiliser code VBA

Bonjour a tous,

Voici mon probleme actuellement je travaille avec du VBA qui navigue quasiment tout le temps entre different classeurs excel, et je souhaiterais pouvoir variabiliser au maximum certain bout de code VBA, afin d'eviter d'avoir du code tres tres lourd...
Par exemple au lieu de devoir ecrire cela tout le temps :

Code:

---

1 2	Workbooks("MyWorkBook").sheets("Sheet1") .cells(

---

Je souhaiterais pouvoir faire ca

Code:

---

1 2 3

Const WorBook1 = "Workbooks("MyWorkBook").sheets("Sheet1") " WorBook1.cells(2,2) = "MyValue"

---

J'ai essaye differente syntaxe mais a chaque fois Excel me dit erreur, qu'il ne veut pas de cette syntaxe.
Savez-vous comment faire cela ?

Bonjour,

Tu peux écrire :

Code:

---

1 2 3

With Workbooks("MyWorkBook").Sheets("Sheet1") .Cells(2, 2) = "MyValue" End With

---

ou

Code:

---

1 2 3

Dim WS As Worksheet Set WS = Workbooks("MyWorkBook").Sheets("Sheet1") WS.Cells(2, 2) = "MyValue"

---

Note le "." devant "Cells" en ligne 2 du premier code.

La syntaxe avec le with je la connais mais ca m'arrive de naviguer d'un classeur a un autre d'une ligne a l'autre donc ecrire with a chaque fois juste pour une ligne est pas pratique :?
La deuxieme syntaxe est plus ce que je recherche merci a toi ! :D