Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Test format fichier

2 réponses
Avatar
Patricia L
Bonjour,

Je dois effectuer une macro en VBA qui doit ouvrir un=20
fichier Excel. Avant d'effectuer l'ouverture du fichier,=20
je souhaiterais valider le format du fichier pour v=E9rifier=20
qu'il s'agit bien d'un fichier Excel. Quelqu'un conna=EEt-il=20
une m=E9thode pour effectuer cela ?

Par avance merci.

2 réponses

Avatar
Ellimac
Bonjour,

Une piste, tester si les 4 derniers caractères sont .Xls :
If Left (NomFic , 4) = ".xls" then
....

Camille

-----Message d'origine-----
Bonjour,

Je dois effectuer une macro en VBA qui doit ouvrir un
fichier Excel. Avant d'effectuer l'ouverture du fichier,
je souhaiterais valider le format du fichier pour
vérifier

qu'il s'agit bien d'un fichier Excel. Quelqu'un connaît-
il

une méthode pour effectuer cela ?

Par avance merci.

.



Avatar
Paul V.
Bonjour,

Tu peux utiliser l'instruction FileFormat comme dans :
If ActiveWorkbook.FileFormat = (ici le format qui t'intéresse par exemple
xlWorkbookNormal ) Then

Attention: consulte le help pour les subtilités des divers formats possibles

--
HTH

Paul V.

Patricia L wrote:
Bonjour,

Je dois effectuer une macro en VBA qui doit ouvrir un
fichier Excel. Avant d'effectuer l'ouverture du fichier,
je souhaiterais valider le format du fichier pour vérifier
qu'il s'agit bien d'un fichier Excel. Quelqu'un connaît-il
une méthode pour effectuer cela ?

Par avance merci.