OVH Cloud OVH Cloud

Macro

5 réponses
Avatar
Céd
Salut =E0 tous.

Comment faire pour que la macro que j'ai cr=E9=E9 soit=20
accessible par un bouton quel que soit le classeur ouvert.=20
Jusqu'=E0 maintenant, le clic sur ce bouton m'ouvre =E0 chaque=20
fois le m=EAme classeur mais ce n'est pas ce que je veux...=20
Si qqn a une id=E9e, je suis preneur.

Merci =E0 tous.

C=E9d

5 réponses

Avatar
sabatier
bonjour céd
j'ai bien une petite idée mais auparavant peux-tu me dire si dans VBE
(auquel tu accèdes par Alt + F11) tu vois dans l'arborescence
apparaissant dans la partie gauche de l'écran VbaProject(PERSO.XLS) ; il
s'agit du classeur de macros personnelles qui se crée dès la première
macro que tu y classes...mais peut-être n'y as-tu encore rien classé
là-dedans...
tu nous dis et tu reklaxonnes
jps

Céd a écrit:
Salut à tous.

Comment faire pour que la macro que j'ai créé soit
accessible par un bouton quel que soit le classeur ouvert.
Jusqu'à maintenant, le clic sur ce bouton m'ouvre à chaque
fois le même classeur mais ce n'est pas ce que je veux...
Si qqn a une idée, je suis preneur.

Merci à tous.

Céd


Avatar
Céd
Salut JPS,

J'ai trouvé la solution. C'est effectivement dans la
macro "PERSO.XLS" qu'il me fallait entrer le code. Je
l'ai mis et... et.... ça marche !!!

Merci de m'avoir mis sur la bonne piste. Je peux
maintenant protéger ou déprotéger toutes les feuilles
d'un classeur en cliquant sur 1 bouton, qui m'affiche une
inputbox dans laquelle je tape mon mot de passe.

Si ça t'intéresse, je mettrai le code à dispo.
A+

Céd
-----Message d'origine-----
bonjour céd
j'ai bien une petite idée mais auparavant peux-tu me
dire si dans VBE

(auquel tu accèdes par Alt + F11) tu vois dans
l'arborescence

apparaissant dans la partie gauche de l'écran VbaProject
(PERSO.XLS) ; il

s'agit du classeur de macros personnelles qui se crée
dès la première

macro que tu y classes...mais peut-être n'y as-tu encore
rien classé

là-dedans...
tu nous dis et tu reklaxonnes
jps

Céd a écrit:
Salut à tous.

Comment faire pour que la macro que j'ai créé soit
accessible par un bouton quel que soit le classeur
ouvert.


Jusqu'à maintenant, le clic sur ce bouton m'ouvre à
chaque


fois le même classeur mais ce n'est pas ce que je
veux...


Si qqn a une idée, je suis preneur.

Merci à tous.

Céd


.




Avatar
sabatier
ça intéresse tout le monde, céd...don't be shy and give your proc here
where everybody enjoys it,including philippe R the starring traitor...
jps

Céd a écrit:
Salut JPS,

J'ai trouvé la solution. C'est effectivement dans la
macro "PERSO.XLS" qu'il me fallait entrer le code. Je
l'ai mis et... et.... ça marche !!!

Merci de m'avoir mis sur la bonne piste. Je peux
maintenant protéger ou déprotéger toutes les feuilles
d'un classeur en cliquant sur 1 bouton, qui m'affiche une
inputbox dans laquelle je tape mon mot de passe.

Si ça t'intéresse, je mettrai le code à dispo.
A+

Céd

-----Message d'origine-----
bonjour céd
j'ai bien une petite idée mais auparavant peux-tu me


dire si dans VBE

(auquel tu accèdes par Alt + F11) tu vois dans


l'arborescence

apparaissant dans la partie gauche de l'écran VbaProject


(PERSO.XLS) ; il

s'agit du classeur de macros personnelles qui se crée


dès la première

macro que tu y classes...mais peut-être n'y as-tu encore


rien classé

là-dedans...
tu nous dis et tu reklaxonnes
jps

Céd a écrit:

Salut à tous.

Comment faire pour que la macro que j'ai créé soit
accessible par un bouton quel que soit le classeur


ouvert.


Jusqu'à maintenant, le clic sur ce bouton m'ouvre à


chaque


fois le même classeur mais ce n'est pas ce que je


veux...


Si qqn a une idée, je suis preneur.

Merci à tous.

Céd


.







Avatar
Céd
Alors voici le petit code que j'ai créé avec l'aide de
plusieurs d'entre vous sur le forum.

On peut protéger et déprotéger toutes les feuilles d'un
classeur en entrant le mot de passe dans une inputbox et
on fait appel à la macro via un bouton.

*** PROTEGER ***
Public Sub protection()
Dim wS As Worksheet, mot_passe As String
mot_passe = InputBox("Taper le mot de passe
désiré", "MOT DE PASSE")
If mot_passe <> "" Then
Application.ScreenUpdating = False
For Each wS In ActiveWorkbook.Worksheets
wS.Protect Password:=mot_passe
Next
Else
MsgBox "Annulé"
End If
End Sub


*** DEPROTEGER ***
Public Sub deproteger()
Dim wS As Worksheet, mot_passe As String
mot_passe = InputBox("Taper le mot de passe", "MOT DE
PASSE")
If mot_passe <> "" Then
Application.ScreenUpdating = False
For Each wS In ActiveWorkbook.Worksheets
wS.Unprotect Password:=mot_passe
Next
Else
MsgBox "Annulé"
End If
End Sub

Ouala ! Si ça peut être utile à qqn d'autre, tant mieux.

Céd
-----Message d'origine-----
ça intéresse tout le monde, céd...don't be shy and give
your proc here

where everybody enjoys it,including philippe R the
starring traitor...

jps

Céd a écrit:
Salut JPS,

J'ai trouvé la solution. C'est effectivement dans la
macro "PERSO.XLS" qu'il me fallait entrer le code. Je
l'ai mis et... et.... ça marche !!!

Merci de m'avoir mis sur la bonne piste. Je peux
maintenant protéger ou déprotéger toutes les feuilles
d'un classeur en cliquant sur 1 bouton, qui m'affiche
une


inputbox dans laquelle je tape mon mot de passe.

Si ça t'intéresse, je mettrai le code à dispo.
A+

Céd

-----Message d'origine-----
bonjour céd
j'ai bien une petite idée mais auparavant peux-tu me


dire si dans VBE

(auquel tu accèdes par Alt + F11) tu vois dans


l'arborescence

apparaissant dans la partie gauche de l'écran VbaProject


(PERSO.XLS) ; il

s'agit du classeur de macros personnelles qui se crée


dès la première

macro que tu y classes...mais peut-être n'y as-tu
encore




rien classé

là-dedans...
tu nous dis et tu reklaxonnes
jps

Céd a écrit:

Salut à tous.

Comment faire pour que la macro que j'ai créé soit
accessible par un bouton quel que soit le classeur


ouvert.


Jusqu'à maintenant, le clic sur ce bouton m'ouvre à


chaque


fois le même classeur mais ce n'est pas ce que je


veux...


Si qqn a une idée, je suis preneur.

Merci à tous.

Céd


.





.






Avatar
sabatier
merci céd et ce sera forcément utile à quelqu'un d'autre...
jps

Céd a écrit:
Alors voici le petit code que j'ai créé avec l'aide de
plusieurs d'entre vous sur le forum.

On peut protéger et déprotéger toutes les feuilles d'un
classeur en entrant le mot de passe dans une inputbox et
on fait appel à la macro via un bouton.

*** PROTEGER ***
Public Sub protection()
Dim wS As Worksheet, mot_passe As String
mot_passe = InputBox("Taper le mot de passe
désiré", "MOT DE PASSE")
If mot_passe <> "" Then
Application.ScreenUpdating = False
For Each wS In ActiveWorkbook.Worksheets
wS.Protect Password:=mot_passe
Next
Else
MsgBox "Annulé"
End If
End Sub


*** DEPROTEGER ***
Public Sub deproteger()
Dim wS As Worksheet, mot_passe As String
mot_passe = InputBox("Taper le mot de passe", "MOT DE
PASSE")
If mot_passe <> "" Then
Application.ScreenUpdating = False
For Each wS In ActiveWorkbook.Worksheets
wS.Unprotect Password:=mot_passe
Next
Else
MsgBox "Annulé"
End If
End Sub

Ouala ! Si ça peut être utile à qqn d'autre, tant mieux.

Céd

-----Message d'origine-----
ça intéresse tout le monde, céd...don't be shy and give


your proc here

where everybody enjoys it,including philippe R the


starring traitor...

jps

Céd a écrit:

Salut JPS,

J'ai trouvé la solution. C'est effectivement dans la
macro "PERSO.XLS" qu'il me fallait entrer le code. Je
l'ai mis et... et.... ça marche !!!

Merci de m'avoir mis sur la bonne piste. Je peux
maintenant protéger ou déprotéger toutes les feuilles
d'un classeur en cliquant sur 1 bouton, qui m'affiche


une


inputbox dans laquelle je tape mon mot de passe.

Si ça t'intéresse, je mettrai le code à dispo.
A+

Céd


-----Message d'origine-----
bonjour céd
j'ai bien une petite idée mais auparavant peux-tu me


dire si dans VBE


(auquel tu accèdes par Alt + F11) tu vois dans


l'arborescence


apparaissant dans la partie gauche de l'écran VbaProject


(PERSO.XLS) ; il


s'agit du classeur de macros personnelles qui se crée


dès la première


macro que tu y classes...mais peut-être n'y as-tu


encore



rien classé


là-dedans...
tu nous dis et tu reklaxonnes
jps

Céd a écrit:


Salut à tous.

Comment faire pour que la macro que j'ai créé soit
accessible par un bouton quel que soit le classeur


ouvert.



Jusqu'à maintenant, le clic sur ce bouton m'ouvre à


chaque



fois le même classeur mais ce n'est pas ce que je


veux...



Si qqn a une idée, je suis preneur.

Merci à tous.

Céd


.


.