Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

ouvrir un fichier

D

diop

Guest
Bonjour le forum,

j'ai un petit souci car je veux via une macro faire apparaitre une boite de dialogue afin d'ouvrir un fichier que je selectionne.
Jusque là tout va bien.
Mais lorsque je selectionne le fichier à ouvrir, et que je clique dessus, il ne l'ouvre pas.
Voici le code que j'utilise pour y arriver

sub ouvrir

ChDir "P:\DF\WCorporate\BUDGET 2005 Forecast 2004\CONSO"

fileToOpen = Application _
.GetOpenFilename("Tous les fichiers Microsoft Excel (*.xls), *.xls")
end sub


Merci de votre aide
 
D

diop

Guest
rebonjour le forum,

j'ai reussi à resoudre le probleme de l'ouverture du fichier par ce code:

sub ouvrir

ChDir "P:\DF"

Set this = ThisWorkbook 'définie la variable this (=ce classeur)
Application.Dialogs(xlDialogOpen).Show 'ouvre la boite de dialogue Excel/Fichier/Ouvrir

end sub

Merci
 

Discussions similaires

Réponses
15
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…