transfert de cellules par double click

Le
Fredy
Bonsoir tous.
J'aimerai envoy par double click des Chiffres qui sont dans des
cellules qui sont sur feuille1 et sur une plage allant de ( B3 :AG3 et
B8 :AG8 ), sur feuille2 ligne ( B9 :AG9 ) sachant que les click seront
fait alatoirement, (ex : une cellule sur 2 , b3, u3, f3,ag3ect , il
y a 32 chiffres) et dans la feuille2 les chiffres clicks devraient
se retrouv la suite.

Merci pour toutes rponses
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel
Le #4905361
Bonsoir.
Mets la macro suivante dans le code de la première feuille :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
Cancel = True
If Intersect(Target, Union(Range("B3:AG3"), Range("B8:AG8"))) _
Is Nothing Or Target.Count > 1 Then Exit Sub
With Sheets("Feuil2")
If .Range("IV9").End(xlToLeft).Column < 33 Then
.Range("IV9").End(xlToLeft).Offset(, 1) = Target
End If
End With
End Sub

Cordialement.
Daniel
"Fredy"
Bonsoir à tous.
J'aimerai envoyé par double click des Chiffres qui sont dans des
cellules qui sont sur feuille1 et sur une plage allant de ( B3 :AG3 et
B8 :AG8 ), sur feuille2 ligne ( B9 :AG9 ) sachant que les click seront
fait aléatoirement, (ex : une cellule sur 2 , b3, u3, f3,ag3...ect , il
y a 32 chiffres) et dans la feuille2 les chiffres clickés devraient
se retrouvé à la suite.

Merci pour toutes réponses
Fredy
Le #4905201
Merci Daniel,
C'est bien ce que je voulais,
Encore merci et à bientot.
Fredy

On 2 juil, 23:45, "Daniel"
Bonsoir.
Mets la macro suivante dans le code de la première feuille :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
Cancel = True
If Intersect(Target, Union(Range("B3:AG3"), Range("B8:AG8"))) _
Is Nothing Or Target.Count > 1 Then Exit Sub
With Sheets("Feuil2")
If .Range("IV9").End(xlToLeft).Column < 33 Then
.Range("IV9").End(xlToLeft).Offset(, 1) = Target
End If
End With
End Sub

Cordialement.
Daniel
"Fredy"
Bonsoir à tous.
J'aimerai envoyé par double click des Chiffres qui sont dans des
cellules qui sont sur feuille1 et sur une plage allant de ( B3 :AG3 et
B8 :AG8 ), sur feuille2 ligne ( B9 :AG9 ) sachant que les click seront
fait aléatoirement, (ex : une cellule sur 2 , b3, u3, f3,ag3...ect , il
y a 32 chiffres) et dans la feuille2 les chiffres clickés devraient
se retrouvé à la suite.

Merci pour toutes réponses


Publicité
Poster une réponse
Anonyme