Je souhaite faire une copie d'une cellule (A1) dans la premiere cellule vide de la colonne AR comment faire
Merci de votre aide
Je souhaite faire une copie d'une cellule (A1) dans la premiere cellule vide de la colonne AR comment faire
Merci de votre aide
Tu peux utiliser cette boucle
a+
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim k as integer k=1 While Not IsEmpty(Range("AR"&k)) k = k + 1 Wend 'Ensuite Range("A1").select 'puis Selection.copy Range("AR"&k).select ActiveSheet.Paste
Je souhaite faire une copie d'une cellule (A1) dans la premiere cellule vide d'une liste qui va de AR6 à AR32Envoyé par dvguy
Salut !
si j'ai bien compris alors ça donnerai :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Dim k as integer k = 6 While Not IsEmpty(Range("AR"&k)) k = k + 1 if k = 32 then Exit sub End if Wend 'Ensuite Range("A1").select 'puis Selection.copy Range("AR"&k).select ActiveSheet.Paste
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager