Discussion :

[Mikadox]

Bonjour,

Dans tous les exemples que je trouve de l'objet Range, la plage de valeur est toujours en dur par exemple Range(A1:J20). Comment je fais pour mettre à la place de 20 la variable NumLigne?

Cordailement

[Philippe Tulliez]

Bonjour,

Code :

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

1
2
3
 Dim numligne As Long: numligne = 20
 Debug.Print Range("A2:A20").Address
 Debug.Print Range("A2:A" & numligne).Address

[gFZT82]

Bonjour,

Il ya de fortes chances pour que tu trouves ton objet Range écrit comme cela

Code :

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

Range("A1:J20")

Ce que tu pourras écrire avec NumLigne

Code :

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

Range("A1:J" & NumLigne)

Cordialement