Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel lancer macro par clic feuil

lancer macro par clic feuil

12 réponses
Avatar
Nico
Bonjour,

Je souhaite lancer une macro au moment ou je cliquerai sur la feuil "toto".
est ce bien ceci ? car je n'y arrive pas

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

End Sub

Merci
Signaler un problème avec ce contenu

2 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
1 2
Avatar
Jacky
Re..
Heuuuu
j'ai juste changé <> par Il y a quelque chose qui m'échappe......
Quel doit être l'utilité de ce MDP ???



JJ

"Nico" a écrit dans le message de
news:
Impec, j'ai juste changé <> par = pour arriver à mes fins, je ne voulais
pas

dire l'inverse.
Merci encore

Nico

"Jacky" a écrit dans le message de news:

Bonsoir
Tout juste......
Même que la feuille est visible avant d'entrer le mdp.
Pour faire bien, faudrait sélectionner une feuille vierge pour la saisie
du

mdp de ce genre....mais j'avais précisé:
Un exemple simple...
Et puis Nico peut peaufiner...


Moi, et les mots de passe.... C'est souvent que cela fini par un tour
dans


la Ferrari..Encore que comme cela, c'est pas trop dur ;o))

Cordialement,
JJ

"anonymousA" a écrit dans le message de
news:433eb7ea$0$7855$
bonjour,

sans oublier de renvoyer vers une autre feuille parceque sinon en
lisant



ta proc on reste sur la feuille qu'il veut interdire d'accès sans mdp.

cordialement,

A+


Re...
Un exemple simple...avec comme mdp 'toto'
'----------
Private Sub Worksheet_Activate()
mdp = InputBox("Entrez le mot de passe", "Mot de passe")
If mdp <> "toto" Then Beep: MsgBox "Vous n'êtes pas autorisé à
utiliser



cette feuille.": Exit Sub
'ici la macro
End Sub
'----------
JJ














Avatar
Nico
En fait c'est un droit de continuer à travailler, si la personne connait le
mdp, il n'y aura pas de conséquence.
Nico

"Jacky" a écrit dans le message de news:
#
Re..
Heuuuu
j'ai juste changé <> par > Il y a quelque chose qui m'échappe......
Quel doit être l'utilité de ce MDP ???



JJ

"Nico" a écrit dans le message de
news:
Impec, j'ai juste changé <> par = pour arriver à mes fins, je ne voulais
pas

dire l'inverse.
Merci encore

Nico

"Jacky" a écrit dans le message de news:

Bonsoir
Tout juste......
Même que la feuille est visible avant d'entrer le mdp.
Pour faire bien, faudrait sélectionner une feuille vierge pour la
saisie



du
mdp de ce genre....mais j'avais précisé:
Un exemple simple...
Et puis Nico peut peaufiner...


Moi, et les mots de passe.... C'est souvent que cela fini par un tour
dans


la Ferrari..Encore que comme cela, c'est pas trop dur ;o))

Cordialement,
JJ

"anonymousA" a écrit dans le message de
news:433eb7ea$0$7855$
bonjour,

sans oublier de renvoyer vers une autre feuille parceque sinon en
lisant



ta proc on reste sur la feuille qu'il veut interdire d'accès sans
mdp.





cordialement,

A+


Re...
Un exemple simple...avec comme mdp 'toto'
'----------
Private Sub Worksheet_Activate()
mdp = InputBox("Entrez le mot de passe", "Mot de passe")
If mdp <> "toto" Then Beep: MsgBox "Vous n'êtes pas autorisé à
utiliser



cette feuille.": Exit Sub
'ici la macro
End Sub
'----------
JJ


















1 2