OVH Cloud OVH Cloud

Proposer d'ouvrir des fichiers EXCEL sous VB

8 réponses
Avatar
Philippe
Bonjour =E0 tous les experts,

Je cherche =E0 faire une macro sous VB qui quand je la=20
lance, me propose d'ouvrir les fichiers EXCEL du=20
repertoire dans lequel je suis.

Cela doit-=EAtre possible, je pense ?

Merci =E0 toutes et =E0 tous

Philippe

8 réponses

Avatar
Jacky
Bonjour Philippe

Essaie
'----------
chemin = "lecteurrépertoirenom du fichier sans l'extension" ' A
adapter
Workbooks.Open FileName:=chemin & ".XLS"
'----------

Salutations
JJ

"Philippe" a écrit dans le message de
news:276601c4ad0e$51aa5000$
Bonjour à tous les experts,

Je cherche à faire une macro sous VB qui quand je la
lance, me propose d'ouvrir les fichiers EXCEL du
repertoire dans lequel je suis.

Cela doit-être possible, je pense ?

Merci à toutes et à tous

Philippe
Avatar
Claude Trouet
Bonjour,
.... les experts OK mais les amateurs ? ( c'est pour rire ! )

Question : faut-il ouvrir un fichier ou plusieurs ? Leurs noms sont-ils
connus à l'avance
ou bien faut-il lire le répertoire pour avoir ce qu'il contient et en
proposer la liste ( si elle existe ! ) ?
CT


"Philippe" a écrit dans le message de
news: 276601c4ad0e$51aa5000$
Bonjour à tous les experts,

Je cherche à faire une macro sous VB qui quand je la
lance, me propose d'ouvrir les fichiers EXCEL du
repertoire dans lequel je suis.

Cela doit-être possible, je pense ?

Merci à toutes et à tous

Philippe
Avatar
AV
....me propose d'ouvrir les fichiers EXCEL du
repertoire dans lequel je suis.


Application.Dialogs(xlDialogOpen).Show

AV

Avatar
Jacky
Re...
Avec le menu ouvrir d'excel

Application.GetOpenFilename (",*.xls,,")

JJ


"Jacky" a écrit dans le message
de news:
Bonjour Philippe

Essaie
'----------
chemin = "lecteurrépertoirenom du fichier sans l'extension" ' A
adapter
Workbooks.Open FileName:=chemin & ".XLS"
'----------

Salutations
JJ

"Philippe" a écrit dans le message
de

news:276601c4ad0e$51aa5000$
Bonjour à tous les experts,

Je cherche à faire une macro sous VB qui quand je la
lance, me propose d'ouvrir les fichiers EXCEL du
repertoire dans lequel je suis.

Cela doit-être possible, je pense ?

Merci à toutes et à tous

Philippe




Avatar
Jacky
Bonjour Alain

Application.Dialogs(xlDialogOpen).Show
Application.GetOpenFilename (",*.xls,,")


Si ces deux codes arrive au même résultat, pourrais-tu expliquer leurs
différences de structure??
STP

JJ

"AV" a écrit dans le message de
news:
....me propose d'ouvrir les fichiers EXCEL du
repertoire dans lequel je suis.


Application.Dialogs(xlDialogOpen).Show

AV





Avatar
AV
Si ces deux codes arrive au même résultat, pourrais-tu expliquer leurs
différences de structure??


Un petit coup de F1 sur "GetOpenFilename"...

AV

Avatar
merci beaucoup, je vais tester
-----Message d'origine-----
Re...
Avec le menu ouvrir d'excel

Application.GetOpenFilename (",*.xls,,")

JJ


"Jacky" a
écrit dans le message

de news:
Bonjour Philippe

Essaie
'----------
chemin = "lecteurrépertoirenom du fichier sans
l'extension" ' A


adapter
Workbooks.Open FileName:=chemin & ".XLS"
'----------

Salutations
JJ

"Philippe" a
écrit dans le message


de
news:276601c4ad0e$51aa5000$
Bonjour à tous les experts,

Je cherche à faire une macro sous VB qui quand je la
lance, me propose d'ouvrir les fichiers EXCEL du
repertoire dans lequel je suis.

Cela doit-être possible, je pense ?

Merci à toutes et à tous

Philippe





.




Avatar
Jacky
Un petit coup de F1 sur "GetOpenFilename"...


Evidemment
Excuse
JJ

"AV" a écrit dans le message de
news:
Si ces deux codes arrive au même résultat, pourrais-tu expliquer leurs
différences de structure??


Un petit coup de F1 sur "GetOpenFilename"...

AV