VBA :copier coller cellule avec condition + doubleclick + boucle [Résolu/Fermé]

Messages postés
6
Date d'inscription
samedi 19 janvier 2013
Statut
Membre
Dernière intervention
19 janvier 2013
- - Dernière réponse : lermite222
Messages postés
8713
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
27 janvier 2014
- 19 janv. 2013 à 14:58
Bonjour,

je suis débutant sur les macro, je souhaiterai faire un copier coller d'une cellule avec une condition après un doubleclick et répéter cela avec une boucle :

si la cellule à droite de ma target value est egal ma target value alors copier la target value et coller sur la cellule à droite de ma target value puis repeter cela pour toutes les cellules = à ma target value et à droite de cette target value


Voici l'idée mais je n'y connais pas grand chose :

Private sub_before doubleclick (targetvalue as range)

Dim i, j As Integer

Range(i & j).Value = Target.Value

For i = 1 To 20

If Range(i & j).Value = Range(i + 1 & j) Then

Range(i & j).Select
Selection.Copy
Range(i + 1 & j).Select
acivesheet.Paste

End If
Next i

End Sub


Voilà merci d'avance à la personne qui pourrait m'aider.





Afficher la suite 

1 réponse

Messages postés
8713
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
27 janvier 2014
977
0
Merci
Bonjour,
Je ne comprend rien à ce que tu dis... Prend ton temps et essaye d'expliqué CLAIREMENT ce que tu veux faire.
A+