Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Comment m'y prendre pour déclancher du code ?

Comment m'y prendre pour déclancher du code ?

9 réponses
Avatar
Serge
Bonjour à tous,


J'ai une feuille de calcul (Feuil1) avec un tableau rempli per code VBA.
J'aimerais je ne sais comment (double clic ou touche F12 par exemple) lancer
du code VBA.
Question :
- Comment déclacher du code VBA sur double clic dans 1 cellule ? et sur
quelle partie de mon projet ?
- Idem sur l'appuye de F12 par exemple.

Merci
Signaler un problème avec ce contenu

9 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Dédé
Salut Serge !

Un tout petit bout de piste... Si tu veux faire déclencher un code
simplement en sélectionnant une cellule, tu peus faire un petit test avec le
code suivant :
Private Sub Worksheet_SelectionChange(ByVal Dédé As Range)
If Intersect(Dédé, [A1]) Is Nothing Then Exit Sub
MsgBox "Salut Serge !", vbInformation, Test
End Sub

La cellule concernée et la cellule A1 ...

Autrement, je suis sûr les d'autre vont te donner la solution pour le
double-clique ;-)

Salutations
Dédé

"Serge" <serge.g8[NO SPAM]@laposte.net> a écrit dans le message de
news:cp95mt$1cc6$
Bonjour à tous,


J'ai une feuille de calcul (Feuil1) avec un tableau rempli per code VBA.
J'aimerais je ne sais comment (double clic ou touche F12 par exemple)
lancer

du code VBA.
Question :
- Comment déclacher du code VBA sur double clic dans 1 cellule ? et sur
quelle partie de mon projet ?
- Idem sur l'appuye de F12 par exemple.

Merci




Avatar
Serge
Merci Dédé,

Ton code me donne une piste mais comment déclancher ton code dans zone bien
définie par exemple le colonne B ?

Merci


"Dédé" a écrit dans le message de
news:%
Salut Serge !

Un tout petit bout de piste... Si tu veux faire déclencher un code
simplement en sélectionnant une cellule, tu peus faire un petit test avec
le

code suivant :
Private Sub Worksheet_SelectionChange(ByVal Dédé As Range)
If Intersect(Dédé, [A1]) Is Nothing Then Exit Sub
MsgBox "Salut Serge !", vbInformation, Test
End Sub

La cellule concernée et la cellule A1 ...

Autrement, je suis sûr les d'autre vont te donner la solution pour le
double-clique ;-)

Salutations
Dédé

"Serge" <serge.g8[NO SPAM]@laposte.net> a écrit dans le message de
news:cp95mt$1cc6$
Bonjour à tous,


J'ai une feuille de calcul (Feuil1) avec un tableau rempli per code VBA.
J'aimerais je ne sais comment (double clic ou touche F12 par exemple)
lancer

du code VBA.
Question :
- Comment déclacher du code VBA sur double clic dans 1 cellule ? et sur
quelle partie de mon projet ?
- Idem sur l'appuye de F12 par exemple.

Merci








Avatar
AV
- Comment déclacher du code VBA sur double clic dans 1 cellule ? et sur
quelle partie de mon projet ?


Dans le module de la feuille :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
maMacro
End Sub

Dans un module ordinaire :
Sub maMacro()
MsgBox "fifi"
End Sub

- Idem sur l'appuye de F12 par exemple.


Dans le module de ThisWorkbook :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnKey "{F12}"
End Sub

Private Sub Workbook_Open()
Application.OnKey "{F12}", "maMacro"
End Sub

AV

Avatar
Dédé
Ben tu fais la même chose comme ceci :

Private Sub Worksheet_SelectionChange(ByVal Dédé As Range)
If Intersect(Dédé, [B:B]) Is Nothing Then Exit Sub
MsgBox "Salut Serge !", vbInformation, Test
End Sub

Est-ce que cela te convient ?

Salutations
Dédé
"Serge" <serge.g8[NO SPAM]@laposte.net> a écrit dans le message de
news:cp97jv$1d97$
Merci Dédé,

Ton code me donne une piste mais comment déclancher ton code dans zone
bien

définie par exemple le colonne B ?

Merci


"Dédé" a écrit dans le message de
news:%
Salut Serge !

Un tout petit bout de piste... Si tu veux faire déclencher un code
simplement en sélectionnant une cellule, tu peus faire un petit test
avec


le
code suivant :
Private Sub Worksheet_SelectionChange(ByVal Dédé As Range)
If Intersect(Dédé, [A1]) Is Nothing Then Exit Sub
MsgBox "Salut Serge !", vbInformation, Test
End Sub

La cellule concernée et la cellule A1 ...

Autrement, je suis sûr les d'autre vont te donner la solution pour le
double-clique ;-)

Salutations
Dédé

"Serge" <serge.g8[NO SPAM]@laposte.net> a écrit dans le message de
news:cp95mt$1cc6$
Bonjour à tous,


J'ai une feuille de calcul (Feuil1) avec un tableau rempli per code
VBA.



J'aimerais je ne sais comment (double clic ou touche F12 par exemple)
lancer

du code VBA.
Question :
- Comment déclacher du code VBA sur double clic dans 1 cellule ? et
sur



quelle partie de mon projet ?
- Idem sur l'appuye de F12 par exemple.

Merci












Avatar
Serge
Merci beaucoup

Serge
"Dédé" a écrit dans le message de
news:
Ben tu fais la même chose comme ceci :

Private Sub Worksheet_SelectionChange(ByVal Dédé As Range)
If Intersect(Dédé, [B:B]) Is Nothing Then Exit Sub
MsgBox "Salut Serge !", vbInformation, Test
End Sub

Est-ce que cela te convient ?

Salutations
Dédé
"Serge" <serge.g8[NO SPAM]@laposte.net> a écrit dans le message de
news:cp97jv$1d97$
Merci Dédé,

Ton code me donne une piste mais comment déclancher ton code dans zone
bien

définie par exemple le colonne B ?

Merci


"Dédé" a écrit dans le message de
news:%
Salut Serge !

Un tout petit bout de piste... Si tu veux faire déclencher un code
simplement en sélectionnant une cellule, tu peus faire un petit test
avec


le
code suivant :
Private Sub Worksheet_SelectionChange(ByVal Dédé As Range)
If Intersect(Dédé, [A1]) Is Nothing Then Exit Sub
MsgBox "Salut Serge !", vbInformation, Test
End Sub

La cellule concernée et la cellule A1 ...

Autrement, je suis sûr les d'autre vont te donner la solution pour le
double-clique ;-)

Salutations
Dédé

"Serge" <serge.g8[NO SPAM]@laposte.net> a écrit dans le message de
news:cp95mt$1cc6$
Bonjour à tous,


J'ai une feuille de calcul (Feuil1) avec un tableau rempli per code
VBA.



J'aimerais je ne sais comment (double clic ou touche F12 par
exemple)




lancer
du code VBA.
Question :
- Comment déclacher du code VBA sur double clic dans 1 cellule ? et
sur



quelle partie de mon projet ?
- Idem sur l'appuye de F12 par exemple.

Merci
















Avatar
Dédé
Salut AV !

Ben j'avais tenté une avec "BeforeDoubleClick" mais j'ai des problèmes ...
est-ce que tu peux me donner la solution avec mon code dedans ? ...

Merci d'avance ;-)
Dédé
"AV" a écrit dans le message de
news:OC%
- Comment déclacher du code VBA sur double clic dans 1 cellule ? et sur
quelle partie de mon projet ?


Dans le module de la feuille :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
maMacro
End Sub

Dans un module ordinaire :
Sub maMacro()
MsgBox "fifi"
End Sub

- Idem sur l'appuye de F12 par exemple.


Dans le module de ThisWorkbook :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnKey "{F12}"
End Sub

Private Sub Workbook_Open()
Application.OnKey "{F12}", "maMacro"
End Sub

AV





Avatar
Serge
Merci "AV"

Serge

"AV" a écrit dans le message de
news:OC%
- Comment déclacher du code VBA sur double clic dans 1 cellule ? et sur
quelle partie de mon projet ?


Dans le module de la feuille :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
maMacro
End Sub

Dans un module ordinaire :
Sub maMacro()
MsgBox "fifi"
End Sub

- Idem sur l'appuye de F12 par exemple.


Dans le module de ThisWorkbook :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnKey "{F12}"
End Sub

Private Sub Workbook_Open()
Application.OnKey "{F12}", "maMacro"
End Sub

AV





Avatar
AV
Ave,

Insère un Cancel=true dans le code pour éviter de te retrouver en mode saisie
après le double-clic

AV
Avatar
Dédé
Merci !

à +
Dédé
"AV" a écrit dans le message de
news:
Ave,

Insère un Cancel=true dans le code pour éviter de te retrouver en mode
saisie

après le double-clic

AV