Sujet Précédent Sujet Suivant

Erreur liée à une variable non définie dans 1 VBA

Résolu/Fermé
Dreampower75 Messages postés 88 Date d'inscription jeudi 28 janvier 2021 Statut Membre Dernière intervention 18 juin 2022 - 16 mars 2022 à 12:08
yg_be Messages postés 22840 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 1 juin 2024 - 1 avril 2022 à 11:55
Bonjour,

Lorsque je lance la Macro ci-dessous du fichier fraisFonction => j'ai le message d'erreur qui s'affiche ci-dessous "variable non définie" et les lignes de codage surlignées en jaune qui apparaissent
La Macro a été programmée sur Windows 7 => Est-ce que cela est lié au fait que j'utilise Windows 10 ?
est-ce que c'est ce codage qui est problématique ? " Set wbSourceMinx = Workbooks.Open(Filename:=strPathFile) "
J'ai joint ce fichier frais fonction et le fichier Achat au 28 02 22 lié au codage VBA

Merci de votre aide
Cordialement.





Le lien a été crée pour le fichier frais fonction : https://www.cjoint.com/c/LCqlgutlYWO
Le lien a été crée pour le fichier Achat au 28 02 22 : https://www.cjoint.com/c/LCqlheES5kO



Configuration: Windows / Chrome 99.0.4844.51
A voir également:

8 réponses

Réponse 1 / 8
yg_be Messages postés 22840 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 1 juin 2024 1 473
16 mars 2022 à 12:28
bonjour,
es-tu certain d'avoir pris une copie d'écran immédiatement après l'apparition du premier message d'erreur?
quelles actions fais-tu pour obtenir cette erreur?
1
Réponse 2 / 8
Dreampower75 Messages postés 88 Date d'inscription jeudi 28 janvier 2021 Statut Membre Dernière intervention 18 juin 2022 2
Modifié le 16 mars 2022 à 12:38
Bonjour,

ce sont les copies d'écran juste après le message d'erreur => Wbsourceminx.close surligné en jaune

La Macro fonctionne sur Windows 7 et c'est en passant sur Windows 10 elle ne fonctionne plus
est-ce que c'est ce codage qui est problématique ? " Set wbSourceMinx = Workbooks.Open(Filename:=strPathFile) "

Merci pour votre aide
0
yg_be Messages postés 22840 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 1 juin 2024 1 473
16 mars 2022 à 13:35
Je ne comprends pas bien ce qui se passe.
Deux suggestions:
1) prendre une capture d'écran avec le message d'erreur affiché
2) supprimer, au moins temporairement, la ligne "on error ...". cela ne peux que cacher la vraie raison du soucis.
0
Réponse 3 / 8
Dreampower75 Messages postés 88 Date d'inscription jeudi 28 janvier 2021 Statut Membre Dernière intervention 18 juin 2022 2
16 mars 2022 à 14:03
voici le message d'erreur qui s'affiche :
0
yg_be Messages postés 22840 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 1 juin 2024 1 473
16 mars 2022 à 14:56
Ah, ce n'est pas le message d'erreur que tu as communiqué au départ!

Cela confirme l'utilité de supprimer, au moins temporairement, la ligne "on error ...".
0
Réponse 4 / 8
Dreampower75 Messages postés 88 Date d'inscription jeudi 28 janvier 2021 Statut Membre Dernière intervention 18 juin 2022 2
16 mars 2022 à 14:39
je pense que c'est ce codage " Filename:=strPathFile " qui pose problème
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 8
Dreampower75 Messages postés 88 Date d'inscription jeudi 28 janvier 2021 Statut Membre Dernière intervention 18 juin 2022 2
16 mars 2022 à 15:54
et concernant le codage " codage Filename:=strPathFile ?
est-il correct ?
0
yg_be Messages postés 22840 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 1 juin 2024 1 473
16 mars 2022 à 15:56
Cette ligne est protégée par le 
on error
, qui cache une erreur éventuelle.
La suppression du 
on error
va nous éclairer.
1
Réponse 6 / 8
Dreampower75 Messages postés 88 Date d'inscription jeudi 28 janvier 2021 Statut Membre Dernière intervention 18 juin 2022 2
16 mars 2022 à 16:09
j'ai une question :

Est-ce que ce codage est correct ? Sheets("Feuil1").Copy after:=wkFraisFonction.Sheets("Anomalie")
VBA me dit que les variables ne sont pas défini ? Pourquoi ?
0
Réponse 7 / 8
Dreampower75 Messages postés 88 Date d'inscription jeudi 28 janvier 2021 Statut Membre Dernière intervention 18 juin 2022 2
Modifié le 16 mars 2022 à 16:13
voici les captures d'écran lié au codage Sheets("Feuil1").Copy after:=wkFraisFonction.Sheets("Anomalie")
d'où provient le problème ?

Merci d'avance

0
yg_be Messages postés 22840 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 1 juin 2024 1 473
16 mars 2022 à 16:38
Je ne vois aucune ligne de code qui assigne une valeur à la variable 
wkFraisFonction
.
Elle me semble donc un bon suspect "variable objet non définie".

Si le fichier auquel devrait correspondre cette variable est le fichier dans lequel se trouve le code VBA, peut-être: 
set wkFraisFonction = thisworkbook
1
Réponse 8 / 8
Dreampower75 Messages postés 88 Date d'inscription jeudi 28 janvier 2021 Statut Membre Dernière intervention 18 juin 2022 2
16 mars 2022 à 18:00
merci pour l'information
0
yg_be Messages postés 22840 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 1 juin 2024 1 473
1 avril 2022 à 11:55
Si cela répond à ta question, peux-tu marquer la discussion comme résolue?
1

Discussions similaires

VBA : Range avec références variables..
Antoine -
MIKE59 -

7 réponses
Instagram "Désolé, une erreur s'est produite"
bananamilk -
cedric.masdeb -

60 réponses
VBA erreur 1004
séverine -
Floroan -

9 réponses
Erreur 1004 - Erreur définie par l'application ou par l'objet
Forp74 -
Forp74 -

5 réponses
"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses