Chemin d'accès par variables

Bonjour,

J'ai une interrogation dont la réponse sera très probablement instantanée pour la plupart d'entre vous, mais j'ai du mal à trouver une réponse claire alors je préfère demander la réponse auprès de votre communauté, et vous remercie par avance.

Dans le code très simplifié ci-dessous, je nomme d'une manière simple le classeur en cours et l'onglet en cours dans 2 variables, et je cherche ensuite à écrire en une seule ligne dans une cellule de l'onglet et du classeur précédemment nommés, en utilisant les variables alors créées.

Or, le code bloque au niveau de l'utilisation de la variable WB correspondant au classeur.
Si je sors "WB." et laisse le reste, ma ligne fonctionne correctement (la variable WS et ma syntaxe sont alors correctes).

Pouvez-vous m'éclairer sur l'erreur générée par mon code ?

je vous remercie par avance :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub test()   Dim WB As Workbook Dim WS As Worksheet   Set WB = ThisWorkbook Set WS = ActiveSheet   WB.WS.Cells(1, 1) = 1 + 1     End Sub

---

Bonjour,j

Comme ceci :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub test()   Dim WB As Workbook Dim WS As Worksheet   Set WB = ThisWorkbook Set WS = WB.ActiveSheet   WS.Cells(1, 1).Value = 1 + 1   End Sub

---

Bonjour,

Oui, effectivement, cela fonctionne, mais que faire si je veux conserver la notion de nom de classeur dans mon code, par exemple si je manipule plusieurs onglets sur plusieurs classeurs dans mon programme?

C'est pour cela que j'essaie de nommer mes différents classeurs en variable, et que je cherche à conserver une "adresse" cohérente contenant et le classeur, et l'onglet, pour garder une certaine simplicité.

En fait je ne comprends pas pourquoi ma variable Workbook ainsi définie ne stocke pas une "adresse" cohérente pour gérer cela, alors que ma variable Worksheet le gère très bien.

Merci à tous :-)

Bonsoir

Pour simplifier : quand tu écris WB. c'est comme si tu avais écrit ThisWorkbook., c'est comme si c'était un alias.

WB.Activesheet, c'est donc équivalent à ThisWorkbook.ActiveSheet.

Quand tu écris WB.WS.xxxx, tu tentes donc d'accéder à la propriété nommée WS de ThisWorkbook alors que cette propriété n'existe pas. C'est ThisWorkbook.ActiveSheet qui existe. Tu peux donc faire WB.ActiveSheet mais pas WB.WS car "tu utiliserais un alias dans un alias" (j'essaie d'utiliser un langage simple ici).

WB.WS.xxx ne fonctionne donc pas.

Pour info : puisque tu as déjà créé une variable WS, il n'est plus utile d'utiliser WB dans ton exemple. WS.Cells(1, 1) est déjà assez explicite.

Bonne soirée.

Merci beaucoup, très clair.

bonne soirée :-)