Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins com plexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répo ndre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) e t y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ai t rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" <tissot.emman...@free.fr> a écrit dans le message de news:
uuBeY6ckHHA....@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins com plexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répo ndre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) e t y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ai t rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins com plexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répo ndre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) e t y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ai t rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" <tissot.emman...@free.fr> a écrit dans le message de news:
uuBeY6ckHHA....@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Tu as oublié cet opération à faire lorsque la fenêtre de l'édit eur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" a écrit dans le message de news:
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" wrote:Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message d e news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins c omplexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de ré pondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans l e cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Tu as oublié cet opération à faire lorsque la fenêtre de l'édit eur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" <ciolan...@gmail.com> a écrit dans le message de news:
1178737167.987616.55...@q75g2000hsh.googlegroups.com...
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" <michde...@hotmail.com> wrote:
Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" <tissot.emman...@free.fr> a écrit dans le message d e news:
uuBeY6ckHHA....@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins c omplexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de ré pondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans l e cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Tu as oublié cet opération à faire lorsque la fenêtre de l'édit eur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" a écrit dans le message de news:
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" wrote:Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message d e news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins c omplexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de ré pondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans l e cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Tu as oublié cet opération à faire lorsque la fenêtre de l'éditeur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" a écrit dans le message de news:
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" wrote:Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Tu as oublié cet opération à faire lorsque la fenêtre de l'éditeur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" <ciolan...@gmail.com> a écrit dans le message de news:
1178737167.987616.55...@q75g2000hsh.googlegroups.com...
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" <michde...@hotmail.com> wrote:
Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" <tissot.emman...@free.fr> a écrit dans le message de news:
uuBeY6ckHHA....@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
Tu as oublié cet opération à faire lorsque la fenêtre de l'éditeur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" a écrit dans le message de news:
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" wrote:Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
j'ai bien coche cette option mais rien y fait
On 9 mai, 21:26, "MichDenis" wrote:Tu as oublié cet opération à faire lorsque la fenêtre de l'éd iteur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" a écrit dans le message de news:
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" wrote:Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de r épondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de c ode
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP S P2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défau t) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'o n ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
j'ai bien coche cette option mais rien y fait
On 9 mai, 21:26, "MichDenis" <michde...@hotmail.com> wrote:
Tu as oublié cet opération à faire lorsque la fenêtre de l'éd iteur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" <ciolan...@gmail.com> a écrit dans le message de news:
1178737167.987616.55...@q75g2000hsh.googlegroups.com...
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" <michde...@hotmail.com> wrote:
Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" <tissot.emman...@free.fr> a écrit dans le message de news:
uuBeY6ckHHA....@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de r épondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de c ode
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP S P2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défau t) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'o n ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
j'ai bien coche cette option mais rien y fait
On 9 mai, 21:26, "MichDenis" wrote:Tu as oublié cet opération à faire lorsque la fenêtre de l'éd iteur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" a écrit dans le message de news:
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" wrote:Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de r épondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de c ode
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP S P2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défau t) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'o n ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
j'ai bien coche cette option mais rien y fait
On 9 mai, 21:26, "MichDenis" wrote:Tu as oublié cet opération à faire lorsque la fenêtre de l'éditeur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" a écrit dans le message de news:
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" wrote:Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
j'ai bien coche cette option mais rien y fait
On 9 mai, 21:26, "MichDenis" <michde...@hotmail.com> wrote:
Tu as oublié cet opération à faire lorsque la fenêtre de l'éditeur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" <ciolan...@gmail.com> a écrit dans le message de news:
1178737167.987616.55...@q75g2000hsh.googlegroups.com...
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" <michde...@hotmail.com> wrote:
Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" <tissot.emman...@free.fr> a écrit dans le message de news:
uuBeY6ckHHA....@TK2MSFTNGP02.phx.gbl...
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/
j'ai bien coche cette option mais rien y fait
On 9 mai, 21:26, "MichDenis" wrote:Tu as oublié cet opération à faire lorsque la fenêtre de l'éditeur
de code de ton classeur Perso.xls est active.
| Dans le classeur Perso.xls
| Ouvrir VBE>Outils>References
| Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Et n'oublie pas par la suite d'enregistrer ton classeur perso.xls.
"magic-dd" a écrit dans le message de news:
salut manu
super ca mais j'ai une erreur ici
dans class1
If Wb.VBProject.Protection = vbext_pp_locked Then
surligné en jaune et ca bloque
prrrrrr je bloque
comme depuis le debut d'ailleurs
On 9 mai, 12:36, "MichDenis" wrote:Une façon intéressante de traiter la problématique...
C'est Magic ...;-)
"tissot.emmanuel" a écrit dans le message de news:
Bonsoir,
Les codes que tu nous fournis sont très intéressants et non moins complexes.
J'ai donc essayé d'en faire une petite synthèse susceptible de répondre au
problème initialement soulevé par Magic DD.
Citation:
sur mon pc, j'ai tous mes classeurs excel (120 environ)
ceux ci ont leurs projet macro de proteger ce qui veux dire que si on
veut acceder au VBA, il faut ce mot de passe.
je suis le seul autorisé à modifier eventuelement des lignes de code
dans VBA
c'est pourquoi je recherche la methode pour desactiver ce mot de passe
à chaque ouverture de fichier sur et uniquement sur mon pc.
Fin de citation.
Voici ce que j'ai testé avec succès sur ma configuration (WinXP SP2 + XL
2003):
Dans le classeur Perso.xls
Ouvrir VBE>Outils>References
Cocher Microsoft Visual Basic for Applications Extensibility 5.3
Puis insérer un module de classe (garder le nom Classe1 par défaut) et y
copier le code suivant:
Public WithEvents ThisApplication As Application
Private Sub ThisApplication_WorkbookOpen(ByVal Wb As Workbook)
If Wb.VBProject.Protection = vbext_pp_locked Then
Application.VBE.CommandBars.FindControl(, 2578).Execute
SendKeys "shazam" 'Le mdp de tous tes classeurs
SendKeys "{ENTER}"
SendKeys "{ESC}" 'Quitte la fenetre propriete du projet
End If
End Sub
Dans le module ThisWorkbook de Perso.xls copier le code suivant:
Dim xlApp As Classe1
Private Sub Workbook_Open()
Set xlApp = New Classe1
Set xlApp.ThisApplication = Application
End Sub
Enregistrer le tout, fermer Excel, ouvrir Excel. Ouvrir un classeur
quelconque, normalement le projet VBA est dévérouillé sans qu'on ait rien eu
à faire si tant est bien sur que le mot de passe soit correct, dans le cas
contraire la boite de dialogue demandant le mot de passe s'affiche.
Cordialement,
Manu/