Erreur 400 après lancement Macro VBA Excel

erwanhavre

XLDnaute Occasionnel
Bonjour à tous je créer une nouvelle discussion car j'ai un soucis avec un fichier créer avec l'aide de thebenoit59
mais sur mon pc et sur d'autres aussi d’ailleurs j'ai un soucis, comme indiqué dans le titre j'ai une fenêtre avec une croix rouge et 400 qui s'ouvre entre ces deux ligne de code

Workbooks.Open ThisWorkbook.Path & "\" & NomFichier & ".xlsm"
With ActiveWorkbook.VBProject.VBComponents(ActiveWorkbook.Sheets("FE").CodeName).CodeModule


est ce que quelqu'un peu m'aider à débugger svp

merciii
 

Fichiers joints

Roland_M

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

bonjour,

je viens de faire un essai en exécution pas à pas (Touche F8)

tout est ok excepté ici !!!
ActiveSheet.Shapes.Range(Array("Picture 3")).Delete
et c'est normal puisque ce n'est pas "Picture 3" mais "image 3"

1' il faut exécuter ton code au pas à pas avec F8 pour suivre le déroulement !
2' se servir de msgbox pour vérifier certaines valeurs: exemple MsgBox NomFichier
3' vérifier certain nom attribué comme ici Picture 3 et Image 3 c'est selon les versions excel !?
-- c'est pour cela qu'il faut toujours renommer ses controls, on évite ainsi ces problèmes !
4' mettre des traitements d'erreurs (on error)

etc ...
 
Dernière édition:

Si...

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

salut

bonjour,
je viens de faire un essai en exécution pas à pas (Touche F8)

tout est ok excepté ici !!!
ActiveSheet.Shapes.Range(Array("Picture 3")).Delete
cela devrait passer avec
Code:
ActiveSheet.Shapes("Picture 3").Delete
 

Roland_M

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

bonjour,

Salut Si...

oui c'est vrai, mais ici ce n'est pas le problème, c'est le nom du shapes, il suffit d'aller sur sa feuille pour voir que c'est "Image 3"
quand j'ai fais l'essai j'ai renommé "Image 3" et la macro fonctionne correctement !

quand à son erreur 400, ici je ne vois pas !?
 

Lone-wolf

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

Bonjour a tous,

sous windows 10, excel 2010, aucune erreur; soit avec Picture, soit avec Image.


A+ :cool:
 

thebenoit59

XLDnaute Accro
Re : Erreur 400 après lancement Macro VBA Excel

La solution a donc été trouvée :).
C'est vrai que je ne remarquais pas l'erreur avec Windows 10 et Excel 2016, le shape étant nommé Picture 3 :confused:
 

erwanhavre

XLDnaute Occasionnel
Re : Erreur 400 après lancement Macro VBA Excel

Bonsoir à tous bon malheureusement j'ai une erreur en mode f8 pas à pas j'ai fait une copie d'écran ci-jointe ..
merci à tous :)
 

Fichiers joints

Roland_M

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

bonsoir,

alors ça va être difficile car l'essai chez moi est concluant après avoir remplacé "Picture 3" par "Image 3"
car sur ta feuille, si tu sélectionnes ton dessin tu verras que c'est "Image 3"

sinon l'erreur 1004 est ici sur cette ligne:
ActiveSheet.Shapes.Range(Array("Picture 3")).Delete
tu dois mettre comme ceci:
ActiveSheet.Shapes.Range(Array("Image 3")).Delete
car c'est ce que tu as sur ta feuille !

pour le reste c'était ok !?
 
Dernière édition:

erwanhavre

XLDnaute Occasionnel
Re : Erreur 400 après lancement Macro VBA Excel

C'est un truc de fou voir pj
ça bloque toujours au meme endroit entre ces deux ligne là
Workbooks.Open ThisWorkbook.Path & "\" & NomFichier & ".xlsm"
With ActiveWorkbook.VBProject.VBComponents(ActiveWorkbook.Sheets("FE").CodeName).CodeModule
malgrès le changement en image 3:mad::confused:
 

Fichiers joints

JCGL

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

Bonjour à tous,

Si cela peut aider : l'erreur est 1004 et non 400

A+ à tous
 

erwanhavre

XLDnaute Occasionnel
Re : Erreur 400 après lancement Macro VBA Excel

effectivement jcjl c'est l'erreur 1004 qui apparaît lorsque l'on le fait en mode pas à pas (f8)
 

Roland_M

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

re

mais tu ne dis pas si tu as des manquants !? (voir mon dernier post !)
 

erwanhavre

XLDnaute Occasionnel
Re : Erreur 400 après lancement Macro VBA Excel

Roland j'ai les 4 cases cochées dans outils et références ...
 

Roland_M

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

re

petite question: quelle version Excel (perso 2007) ?

et quand tu sélectionnes ton image sur ta feuille c'est bien "Image 3" comme chez moi ?
 
Dernière édition:

erwanhavre

XLDnaute Occasionnel
Re : Erreur 400 après lancement Macro VBA Excel

je ne vois pas comment vérifier si j'ai des manquants ?
je me suis trompé il s'agit de la version office pro plus 2013 d'excel
 

erwanhavre

XLDnaute Occasionnel
Re : Erreur 400 après lancement Macro VBA Excel

Roland je viens d'essayer avec ton fichier et ... pareil pareil par contre à chaque fois que je télécharge et lance un classeur il me l'ouvre en "format protégé " et me propose d'activer la modification est ce normale ?
 

Roland_M

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

re

alors ça viendrait peut être de 2013 !? compatibilité microsoft !?!?!?!?

tu l'aurais vu en voyant tes références, puisque tu as vérifié et tu dis avoir les 4 cochées !?
sinon tu vois bien en majuscule "MANQUANT" avec la référence en face >
 
Dernière édition:

Roland_M

XLDnaute Barbatruc
Re : Erreur 400 après lancement Macro VBA Excel

re

quand tu as téléchargé un classeur il se peut que la sécurité se mette automatiquement quand le classeur vient d'un autre ordi

dans le dossier tu fais clic droit sur ton classeur et tu choisis dans la liste propriétés en bas
si tu vois sécurité classeur venant d'un autre ordi alors tu clic débloqué !
 
Dernière édition:

Discussions similaires


Haut Bas