Erreur ouverture automatique d'un fichier

Résolu
iroko45 Messages postés 215 Date d'inscription   Statut Membre Dernière intervention   -  
iroko45 Messages postés 215 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je voudrais ouvrir et fermer automatiquement un fichier Excel. Mais je n'arrive pas à comprendre pourquoi le message suivant apparaît quand j'effectue l’exécution pas à pas: "Désolé... nous ne trouvons pas C:\Users\Desktop\EDC 1\groupe\EST.xlx. Peut-être l'avez-vous déplacé, renommé ou supprimé?
NB: le fichier est sur le bureau dans le dossier groupe.
Merci de m'aider.

Ci-après les lignes de code saisi:
Sub MonTest()
Workbooks.Open "C:\Users\EDC 1\Desktop\groupe\EST.xlx"
Workbooks("C:\Users\EDC 1\Desktop\groupe\EST.xlx").Close

End Sub

A voir également:

2 réponses

lionel
 
Bonjour iroko45,

⚠  Un fichier xlsx ne peut pas contenir de macros, donc le fichier
où tu mets ta sub MonTest() doit être un fichier .xlsm

Je suppose que ce fichier .xlsm ouvre un autre classeur Excel, qui
lui peut être un classeur .xlsm ou .xlsx (selon qu'il contient ou non
des macros).

Attention à ton orthographe : avec VBA, une faute peut faire échouer
le code ; je dis cela car je pense que le nom de ton fichier n'est pas
EST.xlx mais TEST.xlsx (ou peut-être TEST.xlsm ?).

La suite est avec TEST.xlsx (à toi de mettre éventuellement .xlsm).

Essaye d'abord ceci :


Sub MonTest() 
  Workbooks.Open "C:\Users\iroko45\Desktop\EDC 1\groupe\TEST.xlsx"
End Sub


Remplace iroko45 par le nom réel de l'utilisateur ; si ton dossier "EDC 1"
est bien sur le bureau de Windows, c'est ok ; sinon, remplace Desktop
par Documents :


Sub MonTest() 
  Workbooks.Open "C:\Users\iroko45\Documents\EDC 1\groupe\TEST.xlsx"
End Sub


Ton classeur doit normalement s'ouvrir ; sinon, vérifie si ce sont bien
les dossiers "EDC 1" et "groupe" (et TEST.xlsx doit exister).

Je n'ai pas encore mis l'instruction de fermeture du fichier, sinon ça
ouvrirai ton fichier puis le refermerai aussitôt => tu ne saurais pas
si l'ouverture du fichier a bien marché.

Quand ça sera ok pour l'ouverture, voici l'instruction de fermeture :

Workbooks.Close "C:\Users\iroko45\Desktop\EDC 1\groupe\TEST.xlsx"

À toi de la placer correctement ; le chemin devra être le même
que celui que tu as utilisé pour l'ouverture => à adapter.

Cordialement
 
0
iroko45 Messages postés 215 Date d'inscription   Statut Membre Dernière intervention   2
 
bonjour,
merci Lionel. C’était xlsx qu'il fallait écrire.

Merci
0