Double click

[Gil_Se]

Bonjour à tous
Je cherche la bonne macro qui me permet de saisir des données dans un planning en double cliquant sur l'une des cellules "Taches".
Un exemple dans le fichier joint.
Merci.
Gilles

 

[BOISGONTIER]

Re : Double click

Bonjour,

http://boisgontierjacques.free.fr/fichiers/Dates/jb-planningmensuelFormBoutons.xls
http://boisgontierjacques.free.fr/fichiers/Dates/jb-planningmensuelFormCombo.xls

JB

 

[pierrejean]

Re : Double click

Bonjour Gil_Se

Sans double click (la selection suffit)

Public mem
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
Set zone1 = Range("B17:AF26")
Set zone2 = Range("B11:AC11")
If Not Intersect(Target, zone1) Is Nothing Then mem = Target.Address
If Not Intersect(Target, zone2) Is Nothing Then Target.Copy Destination:=Range(mem)
End Sub

 

[Gil_Se]

Re : Double click

Merci à tous.
Je vais adopter surement la proposition de Pierre Jean.
Toutefois j'ai oublié de préciser que les cellules contenant les tâches sont verrouiller qui entraine une erreur d'exécution de la macro.
J'aurais également souhaité qu'après avoir cliquer sur la tâche, la cellule sélectionnée soit celle de droite dans le planning (Exemple: On sélectionne B18 puis on clique sur l'une des tâches, la nouvelle cellule sélectionnée est maintenant C18).
Gilles

 

[pierrejean]

Re : Double click

Re

Vois si cela te convient

 

[Gil_Se]

Re : Double click

Merci beaucoup Pierre Jean.
C'est parfait.
Gilles