Moa

Salut Arsene !

Tu peux aussi rechercher ta cellule par rapport à un de tes titres de tes tableaux, tel que :


Application.Goto Reference:="test1"
Cells.Find(What:="business line").Select
ActiveCell.Offset(0, 1).Select


Ton code "Range("Test1").Offset(0, 3).Value", ne peux pas fonctionner.

1)Il faut d'abord dans ton cas sélectionner ta cellule, donc remplacer Value par Select.

2)Tu demandes un offset par rapport à une plage de cellule, donc lui il te sélectionne une autre plage.

Il faut lui demander un Offset avec comme référence UNE SEULE cellule.

Si tu connais l'emplacement précis de tes tableaux, exemple pour Test1, A1 , tu lui donnes cette cellule comme référence :

Range("A1").Select
ActiveCell.Offset(0, 3).Select

@ +

Moa