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

[onyirimba]

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.

 

[Dranreb]

Si le fichier ne s'ouvre pas vous devez normalement avoir le MsgBox qui s'affiche. S'il e s'affiche pas il s'est ouvert en principe.
Moyen à mon avis le code. J'aurais plutôt écrit puis testé :

   wbSourceMinx.Worksheets(1).Copy After:=ThisWorkbook.Worksheets("Anomalie")

 

[onyirimba]

ok merci

 

[onyirimba]

Si le fichier ne s'ouvre pas vous devez normalement avoir le MsgBox qui s'affiche. S'il e s'affiche pas il s'est ouvert en principe.
Moyen à mon avis le code. J'aurais plutôt écrit puis testé :

   wbSourceMinx.Worksheets(1).Copy After:=ThisWorkbook.Worksheets("Anomalie")

bonjour,

J'arrive à ce message d'erreur ci dessous lorsque je lance la MAcro

est-ce que vous pouvez m'aider ?
Merci d'avance

 

[Dranreb]

Bonjour.
En débogage, mettez des espions sur les expressions impliquées pour voir si elles sont correctes.
Remarque: je n'ai vu nulle part, dans tout le projet VBA, d'initialisation par un Set de wkFraisFonct.
Cela dit c'est le projet d'un classeur qui s'appelle "fraisFonction.xlsm". Ça y ressemble, je trouve . Si c'est bien ce classeur portant la macro que vous voulez désigner, remplacez simplement partout cette variable par ThisWorkbook.

 

[onyirimba]

Bonjour.
En débogage, mettez des espions sur les expressions impliquées pour voir si elles sont correctes.
Remarque: je n'ai vu nulle part, dans tout le projet VBA, d'initialisation par un Set de wkFraisFonct.
Cela dit c'est le projet d'un classeur qui s'appelle "fraisFonction.xlsm". Ça y ressemble, je trouve . Si c'est bien ce classeur portant la macro que vous voulez désigner, remplacez simplement partout cette variable par ThisWorkbook.

bonjour,

Merci beaucoup cela fonctionne avec vos conseils