Lancer une macro si clic dans une cellule

Salut, j'aimerais lancer une macro, simplement en cliquant sur une cellule de la colonne K.

Si vous avez besoin d'un exemple, faites moi signe.

Bonjour

Un signe

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Column = 11 And Target.Count = 1 Then
    ' Appel de ta macro
    MsgBox "macro"
    Target.Offset(0, 1).Select
  End If
End Sub

j'ai essaye mais il ne se passe rien. C'est peut etre parce que j'ai deja un sub de ce type dans la feuille ASS. Je t'envoi un fichier, les instructions sont sur la feuille. Tu ne devrais pas avoir de difficulte!

187capucin-v-47-v02.zip (130.14 Ko)

Bonjour, ou peut être comme cela :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, Range("K1")) Is Nothing Then

Call Macro4

End If

End Sub

Adresse de la cellule : Range("K1"))

Nom de la macro : Call Macro4

Bonjour

Modifies ta macro existante

Private Sub worksheet_SelectionChange(ByVal Target As Range)
  Dim Lig As Long
  If FlgCopy Then

      Lig = Selection.Row
      FlgCopy = False
      Application.EnableEvents = False

      Range("C" & Lig).Insert Shift:=xlDown
      Range("I" & Lig).Select
      Application.CutCopyMode = xlNone 'pour desactiver ce mode (permet d'enlever la selection en pointille si on faisait "COPIER")

      Application.EnableEvents = True

      Number 'met a jour la colonne # de ligne

  End If
If Not Intersect(Columns("K"), Target) Is Nothing And Target.Count = 1 Then
    ' Appel de la macro
    MsgBox "Appel de la macro"
  End If
End Sub

Mais je ne sais si cette macro doit s'exécuter quelque soit la valeur de FlgCopy (cas traité) ou seulement dans un cas précis

Oui, ca dois s'executer quelque soit la valeur de FlgCopy.

Ca fonctionne, par contre notre ajout empeche la touche <link> de toggler entre colonne H et K.

Par exemple un clic sur une cellule en K nous amene sur une cellule en H, ce qui est correcte mais si ensuite on fait "link" , ca nous retourne plus en K.

Donc la macro Link_clic ne fait plus basculer de colonne H a K.

67capucin-v-47-v02.zip (132.04 Ko)

Bonjour

A vérifier

128capucin-v-47-v002.zip (136.44 Ko)

Bravo, encore une fois tout un travail! Ta comprehension est vraiment excellente.

Quel est la difference entre ces 2 types:

worksheet_SelectionChange(ByVal Target As Range)

Worksheet_Change(ByVal Target As Range)

Pourrais-tu ajouter quelques commentaire aux 2 macros, le projet est rendu pas mal gros, je veux m'y retrouver.

69capucin-v-47-v003.zip (134.63 Ko)

Bonsoir

worksheet_SelectionChange(ByVal Target As Range) survient lorsque une cellule est sélectionnée

Worksheet_Change(ByVal Target As Range) survient lorsque une cellule est modifiée

Une cellule veut dire 1 groupe de cellule ( de 1 à ......)

Quelques commentaires dans le code

439capucin-v-47-v003.zip (135.88 Ko)

Merci infiniment!

Rechercher des sujets similaires à "lancer macro clic"