Discussion :

[rsoul]

Bonjour je voudtrai créer une macro qui me permettrai d'afficher un X dans une cellule si on double clique ou si on clique simplement sur cette cellulle.

Merci pour votre aide aplus

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub cocher()
While Sheets("Offres").Activate
 
If Range("c7").Activate Then
Range("c7") = x
End If
 
Wend
 
End Sub

maios ca bloque

[fring]

Bonjour,

Sur un simple clic je te le déconseille, tu vas très vite te retrouver avec une multitude de X non voulu.

Tu as l'évènement BeforeDoubleClick qui te permettrait de le faire

Code à placer dans l'objet feuille concernée et pas dans un module :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Target.Value = "X"
End Sub

Cela ne concerne qu'une seule cellule ?

[rsoul]

Merci Bcp!

[Godzestla]

Salut,

regarde ici. http://www.developpez.net/forums/sho...d.php?t=566363