Discussion :

[c.piette]

Bonjour le forum,


J'ai une quinzaine de tableaux, dont les en-tête sont identiques. Le nom donné à chaque tableau est "formalisé": je les ai nommé "TableauPoste" + Le nom de famille de l'employé en majuscule.

Le nom de l'en-tête de la colonne que voudrais accéder est stocké dans la variable poste.
Le nom de l'employé est stocké dans la variable nom.

Lorsque je lance mon code, je reçois comme message d'erreur que la méthode ou la propriété n'est pas gérée par cet objet ...
Pouvez-vous m'expliquer pourquoi mon code ne fonctionne pas ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Dim Plage3 as Range
NomTableau = "TableauPoste" & Nom
Set Plage3 = ThisWorkbook.Worksheets("ExtractionsPoste").ListObject(NomTableau) _ 
.ListColums(Poste).DataBodyRange

Merci d'avance pour l'explication

[helas]

Bonjour,
Avec ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
 Dim lc As ListColumn
 .......
 
 Set lc = ThisWorkbook.Worksheets("ExtractionsPoste").ListObjects.Item(NomTableau).ListColumns(poste)
 plage3 = lc.DataBodyRange.Address

[c.piette]

Bonjour Helas,

Justement je revenais poster la solution que j'avais finalement réussi à trouver par moi-même... Et, surprise, c'est exactement ce que tu as posté, je te remercie !

Cé

[c.piette]

Re,

Par contre, petite question, pourquoi ce besoin de passer par l'intermédiaire de l'objet ? Fondamentalement on réalise la même chose ne écrivant tout d'une traite non ?