Excel, probleme de boutons avec macro
Résolu/Fermé
pierrotlaluna
-
4 févr. 2010 à 14:59
Farfadet88 Messages postés 6293 Date d'inscription lundi 28 janvier 2008 Statut Membre Dernière intervention 29 avril 2020 - 4 févr. 2010 à 16:01
Farfadet88 Messages postés 6293 Date d'inscription lundi 28 janvier 2008 Statut Membre Dernière intervention 29 avril 2020 - 4 févr. 2010 à 16:01
A voir également:
- Excel, probleme de boutons avec macro
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Si et excel - Guide
- Word et excel gratuit - Guide
- Aller à la ligne excel - Guide
15 réponses
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
4 févr. 2010 à 15:02
4 févr. 2010 à 15:02
Un petit truc du genre
ActiveSheet.Unprotect
en début de macro?
ActiveSheet.Unprotect
en début de macro?
Super !
ça a l'air de marcher tres tres bien !
Merci a toi.
Mais encore une question concernant cette petite modif que tu m'as donné :
Le bouton que j'ai crée, j'en ai un par ligne.
Or en rajoutant ta modif dans une seule macro pour essai, je m'aperçois que ça fonctionne maintenant pour l'ensemble des boutons !
genre j'ai
Ligne 1
Sub Bouton1_QuandClic()
Rows("1").Select
Selection.EntireRow.Hidden = True
End Sub
ligne 2
Sub Bouton2_QuandClic()
Rows("2").Select
Selection.EntireRow.Hidden = True
End Sub
etc
sauf pour la ligne 9 ou j'ai rajouté ta modif dans la macro pour voir. Et etrangement tous les boutons fonctionnent quelle que soit la ligne.
Une explication ?
Merci
ça a l'air de marcher tres tres bien !
Merci a toi.
Mais encore une question concernant cette petite modif que tu m'as donné :
Le bouton que j'ai crée, j'en ai un par ligne.
Or en rajoutant ta modif dans une seule macro pour essai, je m'aperçois que ça fonctionne maintenant pour l'ensemble des boutons !
genre j'ai
Ligne 1
Sub Bouton1_QuandClic()
Rows("1").Select
Selection.EntireRow.Hidden = True
End Sub
ligne 2
Sub Bouton2_QuandClic()
Rows("2").Select
Selection.EntireRow.Hidden = True
End Sub
etc
sauf pour la ligne 9 ou j'ai rajouté ta modif dans la macro pour voir. Et etrangement tous les boutons fonctionnent quelle que soit la ligne.
Une explication ?
Merci
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
4 févr. 2010 à 15:33
4 févr. 2010 à 15:33
La ligne
ActiveSheet.Unprotect
Désactive la protection de toute ta feuille
ajoute
Activesheet.protect à la fin de tes macros et ça devrait le faire
ActiveSheet.Unprotect
Désactive la protection de toute ta feuille
ajoute
Activesheet.protect à la fin de tes macros et ça devrait le faire
pierrotlaluna
Messages postés
13
Date d'inscription
vendredi 22 janvier 2010
Statut
Membre
Dernière intervention
4 février 2010
4 févr. 2010 à 15:34
4 févr. 2010 à 15:34
Edit :
Non en fait ça ne semble pas marcher. Si je rentre un mot de passe pour proteger la feuille, je ne sais pas pourquoi mais si je veux appuyer sur un bouton il faut que je rentre le mot de passe..alors que je voudrais juste qu'il soit actif :/
Non en fait ça ne semble pas marcher. Si je rentre un mot de passe pour proteger la feuille, je ne sais pas pourquoi mais si je veux appuyer sur un bouton il faut que je rentre le mot de passe..alors que je voudrais juste qu'il soit actif :/
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
4 févr. 2010 à 15:35
4 févr. 2010 à 15:35
Euh non, la modif doit être apportée à tous les boutons je pense
pierrotlaluna
Messages postés
13
Date d'inscription
vendredi 22 janvier 2010
Statut
Membre
Dernière intervention
4 février 2010
4 févr. 2010 à 15:43
4 févr. 2010 à 15:43
La ligne
ActiveSheet.Unprotect
Désactive la protection de toute ta feuille
ajoute
Activesheet.protect à la fin de tes macros et ça devrait le faire
Bon alors apres test, c'est bizarre...
quoi que je fasse, si la feuille est protegée par un mdp, si je veux cliquer sur un bouton il faut que je rentre le mdp car il m'est demandé.
Si je le rentre, la ok la macro fonctionne.
c'est un peu embetant cette affaire là :d
ActiveSheet.Unprotect
Désactive la protection de toute ta feuille
ajoute
Activesheet.protect à la fin de tes macros et ça devrait le faire
Bon alors apres test, c'est bizarre...
quoi que je fasse, si la feuille est protegée par un mdp, si je veux cliquer sur un bouton il faut que je rentre le mdp car il m'est demandé.
Si je le rentre, la ok la macro fonctionne.
c'est un peu embetant cette affaire là :d
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
4 févr. 2010 à 15:47
4 févr. 2010 à 15:47
En fait ta feuille est protégée.
Lorsque ActiveSheet.Unprotect se lance, il désactive ta protection. Si tu as mis un code de protection, il est évident qu'il va te le demander (sinon n'importe qui peut modifier la feuille et la protection est inutile)
Lorsque ActiveSheet.Unprotect se lance, il désactive ta protection. Si tu as mis un code de protection, il est évident qu'il va te le demander (sinon n'importe qui peut modifier la feuille et la protection est inutile)
pierrotlaluna
Messages postés
13
Date d'inscription
vendredi 22 janvier 2010
Statut
Membre
Dernière intervention
4 février 2010
4 févr. 2010 à 15:49
4 févr. 2010 à 15:49
arf daccord :/
Donc il n'existe pas de moyen avec une feuille verrouillée par un mdp de conserver actifs les boutons sans avoir a inserer un code ?
Donc il n'existe pas de moyen avec une feuille verrouillée par un mdp de conserver actifs les boutons sans avoir a inserer un code ?
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
4 févr. 2010 à 15:50
4 févr. 2010 à 15:50
Je cherche une manip pour masquer les lignes malgrè la protection, mais dur dur. Je suis pas un crack de VBA
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
4 févr. 2010 à 15:55
4 févr. 2010 à 15:55
Bon alors enlève ce que je t'ai dit (ActiveSheet.Unprotect et ActiveSheet.protect).
Lorsque tu vérouilles ta feuille, coche la case "format de lignes".
Ainsi ça devrait marcher
Lorsque tu vérouilles ta feuille, coche la case "format de lignes".
Ainsi ça devrait marcher
pierrotlaluna
Messages postés
13
Date d'inscription
vendredi 22 janvier 2010
Statut
Membre
Dernière intervention
4 février 2010
4 févr. 2010 à 15:56
4 févr. 2010 à 15:56
Bon ecoute, a bien y reflechir, au final je crois que je prefere qu'il y ai un code. MAIS, est-ce qu'il est possible que le code soit different de celui de la feuille ?
En voilà une belle colle, meme si je me doute bien que ça ne doit pas être possible huhu !
Parcque bon, les utilisateurs du .xls auront dejà un code a rentrer avoir le droit de modifier les cellules non verouillées qui leur seront utiles. Mais je ne souhaitais pas qu'il puisse toucher a autre chose ...
En voilà une belle colle, meme si je me doute bien que ça ne doit pas être possible huhu !
Parcque bon, les utilisateurs du .xls auront dejà un code a rentrer avoir le droit de modifier les cellules non verouillées qui leur seront utiles. Mais je ne souhaitais pas qu'il puisse toucher a autre chose ...
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
4 févr. 2010 à 15:58
4 févr. 2010 à 15:58
Si tu cliques sur "format de lignes" la seule chose qu'ils pourront modifier (même sans rentrer le code) est le format de la ligne.
donc protège ta feuille avec ton code en cochant la case "format de lignes"
donc protège ta feuille avec ton code en cochant la case "format de lignes"
pierrotlaluna
Messages postés
13
Date d'inscription
vendredi 22 janvier 2010
Statut
Membre
Dernière intervention
4 février 2010
4 févr. 2010 à 15:59
4 févr. 2010 à 15:59
Bon alors enlève ce que je t'ai dit (ActiveSheet.Unprotect et ActiveSheet.protect).
Lorsque tu vérouilles ta feuille, coche la case "format de lignes".
Ainsi ça devrait marcher
Mais maintenant je voudrais un code ! mais pas le meme que celui de la feuille !
Qu'est ce que je peux être chiant :d :d :d
désolé :o
Lorsque tu vérouilles ta feuille, coche la case "format de lignes".
Ainsi ça devrait marcher
Mais maintenant je voudrais un code ! mais pas le meme que celui de la feuille !
Qu'est ce que je peux être chiant :d :d :d
désolé :o
pierrotlaluna
Messages postés
13
Date d'inscription
vendredi 22 janvier 2010
Statut
Membre
Dernière intervention
4 février 2010
4 févr. 2010 à 16:00
4 févr. 2010 à 16:00
Si tu cliques sur "format de lignes" la seule chose qu'ils pourront modifier (même sans rentrer le code) est le format de la ligne.
donc protège ta feuille avec ton code en cochant la case "format de lignes"
ok je vais voir, et surtout, MERCI a toi !
donc protège ta feuille avec ton code en cochant la case "format de lignes"
ok je vais voir, et surtout, MERCI a toi !
Farfadet88
Messages postés
6293
Date d'inscription
lundi 28 janvier 2008
Statut
Membre
Dernière intervention
29 avril 2020
1 369
4 févr. 2010 à 16:01
4 févr. 2010 à 16:01
De rien
Bonne journée
Bonne journée