Creer une macro qui m'ouvrira un dossier

creolia · 29 Novembre 2011

Bonjour à tous je suis à la recherche d'une macro qui associer à un bouton ou un lien me permetrais ouvrir un dossier mon but etant que chaque utilisateur puisse choisir sont fichier excel à ouvrir.

j'ai tenter une macro avec l'enregistreur mais cela fonctionne pas.

Code:

Sub Macro1()
    ChDir "C:\Users\infirmerie\Documents\Archive Nathalie"
    Workbooks.Open Filename:= _
        "C:\Users\infirmerie\Documents\"
End Sub

il y a t'il une autre possibilité svp merci d'avance

Balot57 · 29 Novembre 2011

Re : Creer une macro qui m'ouvrira un dossier

Bonjour,
Essaie ce code, peut-être répond-il à ta question.

sub OuvrirFichier()
dim CheminFichier as string
CheminFichier = Application.GetOpenFilename("Fichier à ouvrir (*.xls), *.xls", , "Sélectionnez le fichier à ouvrir", , False)
Workbooks.Open Filename:=CheminFichier
end sub

MichD · 29 Novembre 2011

Re : Creer une macro qui m'ouvrira un dossier

Bonjour,

Tu peux utiliser cette ligne de code + le chemin où tu veux que la fenêtre s'ouvre par défaut

Application.Dialogs(xlDialogOpen).Show ("C:\MonChemin\")

Creer une macro qui m'ouvrira un dossier

creolia

XLDnaute Impliqué

Balot57

Guest

MichD

XLDnaute Impliqué

Discussions similaires

Creer une macro qui m'ouvrira un dossier

creolia

XLDnaute Impliqué

Balot57

Guest

MichD

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency