OVH Cloud OVH Cloud

Récupération des macros d'un fichier qui génère une erreur à l'ouverture

3 réponses
Avatar
Maggy D
Bonjour,
J'ai un classeur contenant des macros et notamment une=20
macro auto_open. Le fichier g=E9n=E8re une erreur qui=20
provoque la fermeture d'excel par windows. J'ai essay=E9=20
d'ouvrir le document en d=E9sactivant les macros (ctrl) +=20
ouverture. J'ai aussi essay=E9 ce code :

=3D=3D=3D>
Sub OuvrirFichierSansActiverLesMacros()

OpenFileWithoutMacro "chemin", "fichier"

End Sub

Sub OpenFileWithoutMacro(Chemin As String, Fichier As=20
String)

'D=E9sactive compl=E8tement l'ex=E9cution des macros du fichier.
'N'affecte pas le comportement des autres fichiers ouverts.
'Cette proc=E9dure doit =EAtre appel=E9 =E0 partir de la feuille
'de calcul et non de la fen=EAtre VBE =E0 cause des commandes

'Les 2 commandes suivantes s'assurent que
'la fen=EAtre "Open" pointe vers le bon r=E9pertoire
SendKeys "{esc}"
Application.Dialogs(xlDialogOpen).Show Chemin

'Ouvre le fichier en d=E9sactivant la macro.
SendKeys "%Fo" & Fichier & "%od"

End Sub
<=3D=3D=3D

L'erreur est =E0 chaque fois g=E9n=E9r=E9e. Comment puis-je=20
r=E9cup=E9rer les macros de ce fichier ???

3 réponses

Avatar
Daniel.j
Appuie sur la touche MAJ à l'ouverture du fichier
cela desactive l'execution des macros!

--
Daniel MVP Excel
FAQ du Forum Microsoft Public Fr Excel
http://dj.joss.free.fr/faq.htm


"Maggy D" a écrit dans le message de news:
0f2901c3843b$48ed6440$
Bonjour,
J'ai un classeur contenant des macros et notamment une
macro auto_open. Le fichier génère une erreur qui
provoque la fermeture d'excel par windows. J'ai essayé
d'ouvrir le document en désactivant les macros (ctrl) +
ouverture. J'ai aussi essayé ce code :

===>
Sub OuvrirFichierSansActiverLesMacros()

OpenFileWithoutMacro "chemin", "fichier"

End Sub

Sub OpenFileWithoutMacro(Chemin As String, Fichier As
String)

'Désactive complètement l'exécution des macros du fichier.
'N'affecte pas le comportement des autres fichiers ouverts.
'Cette procédure doit être appelé à partir de la feuille
'de calcul et non de la fenêtre VBE à cause des commandes

'Les 2 commandes suivantes s'assurent que
'la fenêtre "Open" pointe vers le bon répertoire
SendKeys "{esc}"
Application.Dialogs(xlDialogOpen).Show Chemin

'Ouvre le fichier en désactivant la macro.
SendKeys "%Fo" & Fichier & "%od"

End Sub
<==
L'erreur est à chaque fois générée. Comment puis-je
récupérer les macros de ce fichier ???
Avatar
Monique Brunel
Bonjour Maggy,
bienvenue sur mpfe :-)

Sur les sites proposés dans ce message d'accueil, tu découvriras des cours
(avec ou sans VBA), des classeurs d'exemples à télécharger, des macros, des
trucs et astuces...

Comme la solution proposée sur cette page, qui pourrait peut-être te
dépanner
http://perso.wanadoo.fr/frederic.sigonneau/Bricolos.htm
(DesactiverMacrosALOuverture.bas - Pour ouvrir un classeur qui fait planter
Excel à cause de macros mal programmées)

Pour connaître les habitudes de mpfe (et les erreurs à éviter, comme les
fichiers joints...), tu peux lire ces messages publiés régulièrement ici,
avec l'un de ces intitulés
- FAQ MPFE http://dj.joss.free.fr/netiquet.htm (nétiquette, conseils...)
- [Charte] du forum MPFE http://minilien.com/?9Ag3gXpmA4
et consulter cette page
http://www.excelabo.net/mpfe/connection.htm
(connexion,conseils...), à consulter absolument si tu suis le forum depuis
un site web (la solution la moins efficace et la moins confortable) ou avec
le serveur de Wanadoo (très peu performant quant au délai d'affichage et au
nombre de messages publiés).
Le serveur à utiliser : news.microsoft.com - ou cliquer directement sur
news:microsoft.public.fr.excel

Pour les débutants, voilà 5 bons trucs pour apprendre vite :
- utiliser souvent l'enregistreur de macro et analyser le code obtenu
- utiliser la touche F1 pour appeler l'aide (à propos du mot-clef, en
VBA, sur lequel se trouve le curseur)
- tester et essayer de comprendre des réponses faites à d'autres
- consulter souvent les sites renseignés
- ne jamais hésiter à poser des questions sur le forum

Voici la liste des sites dédiés à Excel, réalisés par des mpfie(ne)s et que
nous devons tous avoir dans nos favoris.
Débutant ou utilisateur confirmé, tu y trouveras de quoi apprendre,
progresser et résoudre bien des problèmes.
(la date d'une mise à jour est signalée par ** ** )
http://dj.joss.free.fr/faq.htm ** 13/07/03 **
la FAQ du forum, mise en oeuvre par Daniel et à lire absolument par tout
nouveau sur mpfe : la bonne manière de participer au forum (charte,
souriettes, abréviations...), liens, bibliographie, les réponses aux
questions le plus souvent posées, des trucs et astuces, un moteur de
recherche interne et externe (Yahoo), une page débutants
http://www.excelabo.net/index.php ** 13/09/03 **
le site humoro-ludique de Misange : une importante rubrique "Trucs et
astuces", des classeurs à télécharger, un glossaire, une page débutants, des
jeux en VBA... et un méta-moteur de recherche sur 6 sites de cette liste...
mais aussi tout ce qui fait "l'esprit mpfe", les perles, les gifs... et,sur
http://fotoflo.free.fr/ les photos des soupers/dîners de mpfe
http://longre.free.fr/ ** 27/03/03 **
le site de Laurent, notre Grand Chef à Quatre Plumes : de très nombreux
liens commentés, les macros pointues de Laurent... (techniques de
programmation, calculs de dates et d'heures, Api...)
http://jacxl.free.fr/mpfe/ ** 01/03/03 **
le site de : les graphiques, la bourse, le Web, un cours VBA, un moteur
de recherche à la page Aide... et le trombinoscope des mpfien(ne)s
http://ericrenaud.free.fr/index.html ** 18/06/03 **
le site d'Eric : particulièrement destiné aux débutants (UserForm...)
http://perso.wanadoo.fr/frederic.sigonneau ** 06/05/03**
le site de Frédéric : gestions de temps, VBA pour Excel... une mine d'or de
macros
http://xlbysteph.free.fr/aideinformatique/mainexcel.html ** 24/04/03 **
le site de Stéphane : cours VBA, Excel 4 (ou 5) et Excel 97/2000...
http://perso.club-internet.fr/bdafonse/excel_1.htm
le site de Bruno : formules, classeurs à télécharger...
http://cherbe.free.fr/ ** 14/03/03 **
le site de Christian : initiation à Excel, initiation à VBA, Excel avancé
sans VBA... (cours à télécharger)
http://www.ilyapa.net/excel/ ** 22/05/02 **
le site de Pascal : procédures VBA, composants par l'exemple,calendriers,
jeux
http://intendant.free.fr/ ** 13/03/02 **
le site de Thierry : cours VBA (début et perfectionnement), graphique, Excel
en bureautique...
http://www.polykromy.com/ ** 29/06/03 **
le site de Gaëtan : cours sur Excel sans VBA, les couleurs, des astuces
animées...
http://www.gaboly.com ** 05/02/03 **
le site de Michel, cours Excel et VBA (avec un Mac)...
http://www.excel-downloads.com ** 26/07/03 **
le site de David, des programmes Excel à télécharger
http://mapage.noos.fr/pnoss/excel.html ** 23/08/02 **
le site de Philippe, trucs et astuces, Exoutils (barre d'outils pour Excel à
télécharger)...
http://www.champey.com/
le site de Patrice : les langages de programmation (VB, VBS et VBA)
http://www.anthony-penel.fr.st
le site d'Anthony : des macros appliquées à la finance
http://www.fundp.ac.be/~jmlamber/
le site de Jean-Marie : initiation VBA, TCD, listes, solveur...
http://www.ibelgique.com/OfficeAssistant
le site de Bureauticien : nombreux exemples résolus par VBA,fonctions...
http://www.cathyastuce.com/index.htm
le site de Cathy : cours Excel avec ou sans VBA...
http://perso.wanadoo.fr/jean.duprat
le site de Papy Jean : fiches Excel pour débutants...
http://www.ifrance.com/fleguen/excel.html
le site de Konga : des classeurs d'exercices (fonctions, macros)


Pour une collection très fouillée d'adresses (avec commentaires) :
le classeur de Clément M, à télécharger sur disciplus
Favoris.xls
Et un lien à y ajouter, la liste des constantes intrinsèques de VBA avec
leur valeur numérique (par versions d'Excel) :
http://support.microsoft.com/support/kb/articles/Q112/6/71.ASP
(télécharger: wc0993.exe)

Pour le passage de Excel 4 à Excel 97, un lien proposé par Geo
http://www.microsoft.com/FRANCE/officedev/infotech/info.asp?mar=/FRANCE/officedev/infotech/MacroXLtoVBA.html
(le lien tient sur plusieurs lignes, il se termine par html)
ou http://minilien.com/?5vyhNUG62R

Enfin, pour retrouver d'anciens messages, tu peux aller sur
http://groups.google.com/advanced_group_search
avec les conseils de Clément M pour obtenir les meilleurs résultats :
--- Là, il y a un écran "bilingue" qui permet de faire une recherche plus
ou moins pointue, selon les informations dont l'on dispose.
Une fois que l'on a repéré un message, il est possible de récupérer
l'ensemble de la ficelle, en cliquant sur "Voyez Fil de Discussion (x
articles)".
Je me suis aperçu que Google fonctionnait très mal quand on fait une
recherche avec un nom qui contient des accents. Il semble donc préférable
d'utiliser l'adresse électronique comme nom d'auteur.
Auteur => 3.450 messages
Auteur Clément Marcotte => 1 message
Auteur Clément_Marcotte => 0 message ---

Bonne lecture et à bientôt sur mpfe.

--
Amicalement,
au nom des mpfiens et mpfiennes,
Monique (la Wallonne)
http://users.skynet.be/osga/ , pour les amateurs d'athlétisme




"Maggy D" a écrit dans le message de
news:0f2901c3843b$48ed6440$
Bonjour,
J'ai un classeur contenant des macros et notamment une
macro auto_open. Le fichier génère une erreur qui
provoque la fermeture d'excel par windows. J'ai essayé
d'ouvrir le document en désactivant les macros (ctrl) +
ouverture. J'ai aussi essayé ce code :
Avatar
Frédéric Sigonneau
Bonjour,

Autre option possible : essayer d'ouvrir ton classeur avec le tableur de la
suite StarOffice (il doit encore être possible d'en trouver une version gratuite
sur le net ou des CD de magazines informatiques). S'il peux l'ouvrir, tes macros
seront mises en commentaires mais tout à fait récupérables.

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !


Bonjour,
J'ai un classeur contenant des macros et notamment une
macro auto_open. Le fichier génère une erreur qui
provoque la fermeture d'excel par windows. J'ai essayé
d'ouvrir le document en désactivant les macros (ctrl) +
ouverture. J'ai aussi essayé ce code :

===>
Sub OuvrirFichierSansActiverLesMacros()

OpenFileWithoutMacro "chemin", "fichier"

End Sub

Sub OpenFileWithoutMacro(Chemin As String, Fichier As
String)

'Désactive complètement l'exécution des macros du fichier.
'N'affecte pas le comportement des autres fichiers ouverts.
'Cette procédure doit être appelé à partir de la feuille
'de calcul et non de la fenêtre VBE à cause des commandes

'Les 2 commandes suivantes s'assurent que
'la fenêtre "Open" pointe vers le bon répertoire
SendKeys "{esc}"
Application.Dialogs(xlDialogOpen).Show Chemin

'Ouvre le fichier en désactivant la macro.
SendKeys "%Fo" & Fichier & "%od"

End Sub
<== >
L'erreur est à chaque fois générée. Comment puis-je
récupérer les macros de ce fichier ???