Discussion :

[BenoitM]

Bonjour via une macro je dois mettre dans une celle la formule suivante : "=list(B4:E4)"

Les paramètres de cette macro sont :
La Ligne : ici 4
La Colonne de début du Range : ici 2 (B)
La longueur du range : ici 3
J'ai plus ou moins réussi avec :

Code :

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

1
2
 
aWorksheet.Cells(Ligne,1).FormulaR1C1 = "=list(R" & Ligne & "C" & ColDebutRange  & ":R" & Ligne & "C" & ColDebutRange  + LongeurRange")"

mais le resultat me donne "=list($B$4:$E$4)"
Savez vous comment avec des integer comme indice de colonne je peux obtenir "=list(B4:E4)" ?

[oOVaveOo]

Bonjour,

Tu peux faire un truc dans ce genre :

Code :

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

1
2
3
adr = Replace(Range(Cells(1, 1), Cells(1, 5)).AddressLocal, "$", "")
 
Range("H3").Formula = "=list(" & adr & ")"

qui te donnera :
=list(A1:E1)

[BenoitM]

Merci

Il y a aussi

Code :

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

Range(Cells(1, 1), Cells(1, 5)).Address(RowAbsolute:=False, ColumnAbsolute:=False)

C'est plus long en écriture mais plus joli

Merci encore