X apparait quand

gaspard2004 -  
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,
j'aimerais trouver une macro fonctionnant dans Excel qui me permettrait d'écrire un "X" dans une cellule quand je clic dedans...peut être avec "ctrl" enfoncé pour ne pas tomber en édition de cellule.
Merci
Configuration: Windows XP Internet Explorer 8.0

3 réponses

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Salut,
    C'est tout simple :
    Clic droit sur l'onglet concerné : "visualiser le code"
    sélectionne dans la liste déroulante en haut sur le milieu gauche: "worksheet"
    dans la liste déroulante en haut sur le milieu droit : selectionchange
    ça te donne :
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    End Sub

    inscrit ceci entre les 2 lignes et avant "end sub" :
    ActiveCell = "X"

    tu fermes la fenêtre et teste...
    0
  2. gaspard2004
     
    Un gros merci....c'est si simple quand on sait
    Je joue un peu avec les macros mais les PrivateSubs savais pas comment ça marchait.
    Encore merci
    Jack
    0
  3. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    De rien.
    N'oublie pas de noter ton post comme "résolu".
    @+
    0