Forum |  HardWare.fr | News | Articles | PC | Prix | S'identifier | S'inscrire | Aide | Shop Recherche
2200 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VBA : erreur d'exécution 13

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

VBA : erreur d'exécution 13

n°2214869
scaryfan
Apple Inside
Posté le 03-01-2014 à 11:40:36  profilanswer
 

Salut à tous !
 
J'ai un gros problème... que je ne comprends pas.
J'ai un fichier Excel qui a un onglet qui s'appelle "RFN" (1er onglet) et une macro 'Workbook_Open' qui s'exécute à chaque ouverture du fichier.
Voici le code de cette macro :
 

Code :
  1. Sub Workbook_Open()
  2.    
  3.      Sheets("RFN" ).Activate
  4. End Sub


 
Quand j'ouvre le fichier, l'erreur exécution '13' s'affiche sur cette ligne.
Si je clique sur "FIN", la macro s'arrête.
Si je la relance avec F5, elle s'exécute normalement...
 
Je ne comprends pas.
J'ai l'impression que le fichier (et sa strucutre) est mémorisé par Excel une fois vraiment ouvert...
 
Quelqu'un peut m'aider ?


---------------
Conducteur de Twingo - Ancien pilote de 206 RC   -   Ω OMEGA Speedmaster Ω au poignet...
mood
Publicité
Posté le 03-01-2014 à 11:40:36  profilanswer
 

n°2214870
scaryfan
Apple Inside
Posté le 03-01-2014 à 11:48:00  profilanswer
 

J'ai renommé la macro en OUVERTURE (au lieu de Workbook_Open).
Le fichier s'ouvre tranquillement. OK.
Si je lance cette macro, l'erreur '13' s'affiche.
Si je relance, ça marche.
 
Et donc, ça n'est pas le fait que le fichier doive être totalement ouvert.
 
 :cry:


---------------
Conducteur de Twingo - Ancien pilote de 206 RC   -   Ω OMEGA Speedmaster Ω au poignet...
n°2214872
scaryfan
Apple Inside
Posté le 03-01-2014 à 12:04:03  profilanswer
 

:??:  
Bon, j'ai trouvé une parade... mais alors là, je ne comprends toujours pas où est le problème.
 
Voici mon nouveau code :
 

Code :
  1. Sub Workbook_Open()
  2.    
  3.     On Error GoTo Erreur1:
  4.    
  5.     Sheets("RFN" ).Activate
  6. Erreur1:
  7.     Sheets("RFN" ).Activate
  8. End Sub


 
 
Incroyable, non ?
 
 :??:


---------------
Conducteur de Twingo - Ancien pilote de 206 RC   -   Ω OMEGA Speedmaster Ω au poignet...
n°2214873
scaryfan
Apple Inside
Posté le 03-01-2014 à 12:15:23  profilanswer
 

Désolé d'avoir pollué comme ça !
Par contre, si quelqu'un sait le pourquoi du comment, je suis preneur de la réponse.
Merci et bonne année à tous !


---------------
Conducteur de Twingo - Ancien pilote de 206 RC   -   Ω OMEGA Speedmaster Ω au poignet...
n°2214887
Marc L
Posté le 03-01-2014 à 15:13:35  profilanswer
 

 
           Bonjour,
 
           c'est peut-être un problème de nom identique utilisé dans différents objets …
           Le classeur est peut-être partiellement endommagé …
           Ou encore une concurrence avec un autre évènement …
 
           Sinon cela serait bien de qualifier proprement la feuille :  Me.Worksheets("RFN" ).Activate  …
 
           Mais le mieux est de ne pas utiliser le nom de la feuille mais son CodeName, par exemple  Feuil1.Activate  …
           Le CodeName est ce qui précède le nom de la feuille entre parenthèses dans l'environnement VBA
           comme par exemple  Feuil1 (RFN)  …


Message édité par Marc L le 03-01-2014 à 15:18:36
n°2215032
scaryfan
Apple Inside
Posté le 05-01-2014 à 13:14:15  profilanswer
 

Bonjour Marc !
Merci pour ta réponse qui dépasse un peu mes connaissances en terme de code VBA.
Concernant un classeur endommagé, comment faut-il faire pour remédier à ce problème ? Y a-t-il une manipulation particulière à faire ?
Et pour Me.worksheets("RFN" ).Activate, je ne connais pas...  
Et merci pour le conseil du CodeName.  ;)


---------------
Conducteur de Twingo - Ancien pilote de 206 RC   -   Ω OMEGA Speedmaster Ω au poignet...
n°2215047
Marc L
Posté le 05-01-2014 à 17:25:21  profilanswer
 

 
           En général, en cas de classeur dysfonctionnel, le plus simple est de recopier les données dans un classeur vierge …


Message édité par Marc L le 05-01-2014 à 17:25:34

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VBA : erreur d'exécution 13

 

Sujets relatifs
[VBA] Outlook : Creation d'une textboxRESOLU Erreur dans un count
[VBA-Excel] Comment appeler un fichier pour récupérer des données ?[Powershell] Pb de droit d'execution
Délai d'exécution de Java avec Windows 8 + NvidiaErreur VBA : erreur d'exécution 57121
VBA : Erreur d'exécution '-2147417848 (80010108)Erreur d'execution '9' VBA sur Excel 2007
[VBA] Erreur d'exécution '-2147417848 (80010108)'erreur d'execution VBA/access
Plus de sujets relatifs à : VBA : erreur d'exécution 13


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite) / Groupe LDLC / Shop HFR