Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Cmd protégé par mot de passe

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion BBRT14
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

BBRT14

XLDnaute Nouveau
Bonjour l'équipe,
voila j'ai un bouton de commande protégé par un mot de passe. sous 2007 pas de problème cela fonctionne bien mais sous 2003 j'ai une erreur bibliothèque
donc je suis allez dans mon VBA => outil => référence et là bizarre impossible d'avoir accès à référence celui ci reste grisé.
car il me semble qu'il faut activer microsoft internet control
ci joint exemple

merci d'avance
et bonne journée
 

Pièces jointes

Trier par date Trier par votes
Re : Cmd protégé par mot de passe

bonjour eddy51,

Oui le cmd est crée sous 2007 mais il est enregistré en 2003, car je n'ai que 2003 au boulot. changer le MDP humm je ne pense pas que le problème soit là mais je vais tester cette après midi.
Merci
 
Vote positif 0 Vote négatif
Re : Cmd protégé par mot de passe

Bonjour BBRT14, Eddy,

Je viens d'ouvrir ton fichier en XL2003, ai tapé le mot de passe sans soucis, et j'accède aux Références....
Au vu du contenu de ce classeur, je ne vois pas quelle Référence devrait être cochée, mais tu as surement effacé plein de choses dans ton classeur
 
Vote positif 0 Vote négatif
Re : Cmd protégé par mot de passe



Bonsoir tototiti2008,Eddy, et tout le Fofo
bon je viens de renter, j'ai testé mon mon fichier exemple au boulot et ça fonctionne bien sous 2003 donc je me tire les cheveux à chercher pourquoi cela ne fonctionne pas dans mon classeur original.
je vous joint les deux afin de faire les même testes que moi sur 2003 et 2007 sachant que sur 2007 il n'y a aucun problème.
En vous souhaitant une bonne soirée
merci
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Cmd protégé par mot de passe


Bonsoir,
Me voilà chauve ;-) personne n'a une ptite idée sur mon problème ?
Le mot de passe du Boutons = moi dans le premier fichier
& mot de passe = cmos dans le deuxième
merci & bonne soirée
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Cmd protégé par mot de passe

bonjour tout le monde
en rajoutant Dim motdepasse as string dans les modules qui coincent , tout à l air de rentrer dans l ordre
E et F


dans le premier fichier le motdepasse n et pas" cmos" mais" moi" !!! farceur lol
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Cmd protégé par mot de passe

Bonjour Evelynetfrancois,
Merci de ton aide, je teste cela cette après midi, car j'ai pas 2003 chez moi.
Mais chose bizarre pourquoi cela fonctionne t'il bien dans le premier fichier & non dans le deuxième quand je suis en 2003 ?
Je tiens informé
Bonne journée
Ps : désolé pour l'erreur sur le mot de passe
 
Vote positif 0 Vote négatif
Re : Cmd protégé par mot de passe

Bonsoir Evelynetfrancois,
Merci de votre aide, comme promis voici le résultat de : en rajoutant Dim motdepasse as string. & bien cela fonctionne bien sur 2003.
si je peux me permettre j'ai encore un souci avec mon module 2
excel 2003 me génère une erreur :

Private Sub SupprimerEnregistrement()
'
' SupprimerEnregistrement
' BBRT 2012
Dim Paramétres_N°_ligne As String
If [Paramétres_N°_ligne] = "0" Then Exit Sub

MsgBox "Vous allez supprimer la 'Référence Conditionnée de la Base V033", vbCritical + vbYesNo + 255, "V033 2012"

If vbYes Then

Dim nb_enregistrements_bd As String
Sheets("BD").Rows([Paramétres_N°_ligne] = 1.Delete Shift:=xlUp <=== Cette Erreur
If [nb_enregistrements_bd] < [Paramétres_N°_ligne] Then [Paramétres_N°_ligne] = [Paramétres_N°_ligne] = "- 1"
End If

End Sub

comme vous êtes sur 2000 j'aimerai savoir si elle est générée chez vous
Merci pour le teste
moi en attendant je vais installer 2003 sur un autre de mes PC
Cordialement & bonne soirée
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : Cmd protégé par mot de passe

Bonjour,
J'ai modifié la ligne mais sans résultat
merci
Ci joint Classeur
Bonne journée

Private Sub SupprimerEnregistrement()
'
' SupprimerEnregistrement
' BBRT 2012
Dim Paramétres_N°_ligne As String
If [Paramétres_N°_ligne] = "0" Then Exit Sub

MsgBox "Vous allez supprimer la 'Référence Conditionnée de la Base V033", vbCritical + vbYesNo + 255, "V033 2012"

If vbYes Then
Sheets("BD").Rows([Paramétres_N°_ligne] + 1).Delete Shift):=xlUp)

If [nb_enregistrements_bd] < [Paramétres_N°_ligne] Then [Paramétres_N°_ligne] = [Paramétres_N°_ligne] - 1
End If
End Sub
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Cmd protégé par mot de passe

re peut etre comme ça

Private Sub SupprimerEnregistrement()
Dim Paramétres_N°_ligne As Byte
Dim nb_enregistrements_bd As Byte
If [Paramétres_N°_ligne] = "0" Then Exit Sub
MsgBox "Vous allez supprimer la 'Référence Conditionnée de la Base V033", vbCritical + vbYesNo + 255, "V033 2012"
If vbYes Then
Sheets("BD").Rows([Paramétres_N°_ligne] + 1).Delete Shift:=xlUp
If [nb_enregistrements_bd] < [Paramétres_N°_ligne] Then [Paramétres_N°_ligne] = [Paramétres_N°_ligne] - 1
End If
End Sub


E et F
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

A
  • Question Question
Autres Protégé un fichier csv par mot de passe
2
Réponses
16
Affichages
780
job75
A
  • Question Question
XL 2013 Liaisons de données externes avec un fichier contenant un mot de passe
Réponses
14
Affichages
1 K
Staple1600
T
  • Question Question
Microsoft 365 Cacher / détailler certaines colonnes dans certains onglets avec mot de passe
Réponses
6
Affichages
746
ThierryP
T
P
  • Question Question
XL 2016 Actualisation d un fichier partage protege par mot de passe
Réponses
0
Affichages
328
polyteis
P
Office XLS : Fonction simplifiant l'utilisation de la fenêtre FileDialog
Réponses
6
Affichages
344
Lu76Fer
N
  • Question Question
XL 2019 VBA Connexion simultané de plusieurs utilisateurs d'un classeur avec différents accès
Réponses
5
Affichages
1 K
herve62
E
  • Question Question
Microsoft 365 Affichage de données suivant utilisateur
Réponses
8
Affichages
2 K
ERN
E
  • Résolu(e)
XL 2013 Mot de passe par defaut d'un classeur protégé par le code VBA?
Réponses
7
Affichages
2 K
Vakaba
K
  • Question Question
XL 2016 classeur avec mot de passe d'ouverture par utilisateur et archivage
Réponses
3
Affichages
3 K
kbise
K
M
  • Résolu(e)
Microsoft 365 Protéger une feuille masquée par un mot de passe
Réponses
7
Affichages
5 K
leboss
L
A
  • Question Question
Microsoft 365 Problème de compatibilité sous Office 365
Réponses
10
Affichages
4 K
chris
C
  • Résolu(e)
XL 2016 Créer une INPUTBOX pour saisir un login et mot de passe en écriture ou choisir "lecture seule
Réponses
7
Affichages
2 K
C.PAGAGNÉ
C
A
  • Résolu(e)
XL 2016 Verrouiller feuille avec création de mot de passe
Réponses
2
Affichages
1 K
AntonG
A
T
  • Question Question
Validation choix contenu cellule par mot de passe
Réponses
9
Affichages
2 K
soan
S
F
  • Question Question
Autres Mot de passe et utilisateur
Réponses
8
Affichages
1 K
FOUQUET Yves
F
A
  • Question Question
Filtre par VBA et feuille protégée
Réponses
8
Affichages
3 K
Staple1600
D
  • Question Question
La protection d'une feuille possible avec du VBA ?
Réponses
3
Affichages
1 K
Staple1600
N
  • Question Question
Deproteger fichier excel sous mot de passe
Réponses
1
Affichages
817
vgendron
H
  • Question Question
vba veryhidden (cacher des feuilles)
Réponses
4
Affichages
2 K
Hx2000
H
S
  • Question Question
XL 2013 refus de déverrouillage au moment de saisir mot de passe puis message abscons …
Réponses
2
Affichages
2 K
Sebast
S
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…