Référence pour une cellule
Bonjour,
je cherche à indiquer l'adresse d'une plage de données qui vont être copiées puis placé dans une autre feuille. En fait je Récupère 2 valeurs X et Y que je stock dans deux variables "Ref" et "NvRef". Ensuite je vais récupérer la dernière valeur de la ligne qui est non-vide
Ce que je sais pas faire c'est indiqué le repère dans "Range". Est-ce possible ?
Bout de mon code (le code est juste à titre explicatif):
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
Sub copie()
Dim ref As Integer
Dim Nvref As Integer
Dim DL As Integer
Ref = X ' considérons que X est un code qui copie une valeur d'une autre feuille pour me servir de repère.
Nvref = Y 'Idem que X
DL = Range("A" & Rows.Count).End(xlUp).Row 'je récupère la dernière ligne de ma feuille
Range("A"&Ref : "B"&DL).Copy Feuil4.Range("A"&NvRef) ' Cest quelque chose comme cela que je souhaite faire et je sais pas si ça se fait et comment bien écrire le code
'ref, Nvref et DL sont dynamiques et sont amenés à changer de valeur et c'est pour cela que je veux une formule qui copie et colle en fonction de la valeur de "Ref" et "Nvref"
End Sub |
Merci par avance pour vos réponses
