XL 2010 impossible import fichier erreur '1004'(résolu)

[Kael_88]

Le Forum,

Etant un très mauvais programmeur, j'aurai besoin d'un coup de main,

lorsque j'essai de copié la feuille d'un fichier source avec ce code,

Sub MàJ_Data()
Dim chemin As String

chemin = "C:\Mise à Jour"

Application.Dialogs(xlDialogOpen).Show (chemin)
Cells.Select
Selection.Copy
Windows("Test.xls").Activate
Sheets("Data").Select
Range("A1").Select
ActiveSheet.Paste
Range("A1").Select

End Sub

cela me met une erreur '1004' comme ci dessous.
y a t il moyen de l’éviter sans ouvrir le fichier source ?

Merci aux intéressés

 

[Roland_M]

bonsoir,

comme l'indique le message, tu essaies de charger un fichier dont l'extension ne correspond pas !?

cela me met une erreur '1004' comme ci dessous.
y a t il moyen de l’éviter sans ouvrir le fichier source ?

s'il y a une erreur il faut solutionner et pas contourner !
ensuite,
y a t il moyen de l’éviter sans ouvrir le fichier source ?
ben oui, il suffit de ne pas l'ouvrir pour l'éviter, non ?

 

[Kael_88]

Le forum, Roland_M,

Merci pour ta réponse abstraite.

Au cas ou je me sois mal fait comprendre, le fichier est extrait par une autre application en .XLS comme le montre le screen.
Si je vais dans ce fichier et que je sélectionne manuellement la page, je peux la copier or je voudrais automatiser cette action depuis un bouton.

Merci de votre retour.

 

[cathodique]

Le forum, Roland_M,

Merci pour ta réponse abstraite.

Au cas ou je me sois mal fait comprendre, le fichier est extrait par une autre application en .XLS comme le montre le screen.
Si je vais dans ce fichier et que je sélectionne manuellement la page, je peux la copier or je voudrais automatiser cette action depuis un bouton.

Merci de votre retour.

Bonjour🙂,

Roland_M😉, Kael😉,

@Kael_88 : La réponse de Roland_M abstraite?!!! Je ne trouve pas, il a répondu exactement à ta question.
Je pense que ta discussion est incomplète, ne manquerait-il pas quelque chose!
Tu dis bien: "je vais dans le fichier...

Allez bonne journée.😀😀😀

 

[Roland_M]

bonjour,

salut à toi Cathodique ! c'est vrai que la question n'est pas claire du tout !

si c'est pour automatiser une copie de feuille d'un fichier chargé, alors à voir avec ci-joint

il faudra remplir les variables perso !

 

[Kael_88]

Le Forum, Roland_M,

Merci de t'etre penché sur le problème, j'ai adapté le code à mon document et j'ai un autre message d'erreur, comme suit :

Cela peut-il venir du fait que le fichier source soit :

Si oui, y a t il moyen de l'éviter et de pouvoir automatiser la tâche ?

Merci de votre retour

 

[Roland_M]

re

il semble que oui !
il faut faire accepter dans les sécurités macros !

parce que la ligne de code est correcte et chez moi ça fonctionne impec avec Excel 2007 et 2016 !

tu as essayé de mettre cette ligne en rem ? (bien que ça me paraisse abracadabrant)

il faudrait réfléchir aussi et s'investir un peu !

 

[Kael_88]

Le forum, Roland_M,

Je te remercie, de tes conseilles, et vais voir s'il existe un autre moyen.

Merci encore pour ton implication.

 

[Roland_M]

re

y a pas de quoi on est là pour ça !

mais j'arrive pas à te suivre !? c'est LA solution !
cette ligne as-tu essayé en la mettant en remarque, tu ne m'as pas dis !?
il faut suivre les messages et répondre et ne pas tout abandonner au premier hic !
un peu de persévérance que diable !