Insérer le Macro dans la cellule sélectionnée

Fermé
Leeloo - Modifié le 9 nov. 2021 à 16:12
 Leeloo - 9 nov. 2021 à 19:30
Bonjour,
Je suis une vrai débutante dans les Macros

J'ai réussi à faire mon macro qui est d'insérer un carré noir dans une cellule. Parfait ça fonctionne.

Par contre, il s'insert toujours dans la même cellule, c'est à dire la cellule que j'ai créer mon macro.
Moi, j'aimerais que le macro (mon carré noir) s'insert dans la cellule que je sélectionne.

voici le code

Private Sub Worksheet_Change(ByVal Target As Range)

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Sélection des cellules de la plage "ma_plage"


End Sub


Merci
A voir également:

1 réponse

M-12 Messages postés 1331 Date d'inscription lundi 22 septembre 2008 Statut Membre Dernière intervention 8 avril 2023 284
9 nov. 2021 à 16:23
Bonjour,
Un exemple avec double clic pour carré noir
et clic droit pour l'ôter
https://www.cjoint.com/c/KKjpxa3re0K
0
Super merci, mais c'est un genre de formulaire que je veux créer. Je mets les macros (carré noir) dans le ruban accès rapide.
Ce que je veux est quand je suis dans une cellule, je clic sur mon carré dans la barre d'outil accès rapide et le carré apparait. Merci
0
M-12 Messages postés 1331 Date d'inscription lundi 22 septembre 2008 Statut Membre Dernière intervention 8 avril 2023 284 > Leeloo
9 nov. 2021 à 17:18
Place un classeur exemple
0
Yoyo01000 Messages postés 1639 Date d'inscription samedi 2 février 2019 Statut Membre Dernière intervention 7 mars 2022 165 > Leeloo
9 nov. 2021 à 19:20
Bonsoir Leeloo, M-12

Voici une proposition:

Sub remplissage()
ActiveCell.Interior.Color = RGB(0, 0, 0)
End Sub
0
Leeloo > Yoyo01000 Messages postés 1639 Date d'inscription samedi 2 février 2019 Statut Membre Dernière intervention 7 mars 2022
9 nov. 2021 à 19:30
Merci je test tantôt car je dois travailler, je vous revient plus tard
0