Macro s’exécute a la sélection d'une celulle

Fermé

Lohoo Messages postés 18 Date d'inscription jeudi 1 novembre 2018 Statut Membre Dernière intervention 23 janvier 2021 - Modifié le 6 mai 2020 à 15:30
Lohoo Messages postés 18 Date d'inscription jeudi 1 novembre 2018 Statut Membre Dernière intervention 23 janvier 2021 - 6 mai 2020 à 16:11

Bonjour,

j'aimerai que ma micro macro s’exécute quand je sélectionne n'importe quelle cellule de ma feuille [

Sub Macro1()
'
' Macro1 Macro
Selection.Interior.Color = RGB(255, 255, 0)
SendKeys "^(c)", True
End Sub

j'ai fouiné a gauche a droite mais n’étant pas un spécialiste d'excel VBA je n'ai pas trouvé de code correspondant.

par avance merci

A voir également:

Macro s’exécute a la sélection d'une celulle
Macro word - Guide
Macro logiciel - Télécharger - Organisation
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Macro recorder - Télécharger - Confidentialité
Inverser selection excel - Forum Excel

2 réponses

Réponse 1 / 2

via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 2 702
6 mai 2020 à 15:54

Bonjour

Macro à mettre dans le worksheet de la feuille correspondante (ouvrir editeur VBA - double-clic sur la feuille dans l'arborescence - copier coller la macro)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Selection.Interior.Color = RGB(255, 255, 0)
SendKeys "^(c)", True
End Sub

Par contre la cellule reste colorée
Si tu veux qu'en sélectionnant ensuite une autre cellule la1ere redevienne normale il faut mettre cette macro :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Selection.Interior.Color = RGB(255, 255, 0)
SendKeys "^(c)", True
If der = "" Then der = "$A$1"
Range(der).Interior.Pattern = xlNone
der = Target.Address
End Sub

puis dans l'éditeur VBA faire Insertion - Module et dans la page blanche entrer :

Public der As String

Cdlmnt
Via

Lohoo Messages postés 18 Date d'inscription jeudi 1 novembre 2018 Statut Membre Dernière intervention 23 janvier 2021
6 mai 2020 à 16:10

merci beaucoup ça fonctionne très bien et cela va me permettre de gagner du temps ;)

j'ai une autre question qui mets venu du coup ;) est il possible avec sendkeys de simuler un alt- tab afin de basculer sur un autre logiciel ou je dois coller ce que je viens de copier dans excel ?
merci

Réponse 2 / 2

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
Modifié le 6 mai 2020 à 16:06

Bonjour,

remarque comme la macro se déclenche lorsqu'on sélectionne une cellule (target), il rst inutile d'utiliser
SendKeys "^(c)", True

comme la sa cellule est sélectionnée (target)il est inutile de préciser "selection"

Lohoo Messages postés 18 Date d'inscription jeudi 1 novembre 2018 Statut Membre Dernière intervention 23 janvier 2021
6 mai 2020 à 16:11

Merci pour ton aide je ne savais pas trop ou coller la proposition de via55 ;)

j'ai une autre question qui mets venu du coup ;) est il possible avec sendkeys de simuler un alt- tab afin de basculer sur un autre logiciel ou je dois coller ce que je viens de copier dans excel ?
merci

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

programme qui n'affiche pas le mot secret

Outil sélection Adobe Illustrator

erreur d'execution 9, l'indice n'appartient pas à la sélection

Impossible d'exécuter les macros

Discussions similaires

Newsletters