Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel boites dialogs

boites dialogs

3 réponses
Avatar
JLuc
Bonjour les lecteurs,
dans mon appli, je voudrais selectionner un repertoire, la commande :
Dim var
var = Application.Dialogs(xlDialogOpen).Show
me permet de selectionner un fichier, quelle boite de dialague dois je
utiliser pour avoir que les repertoires ?
Merci pour vos reponses

--
JLuc

Pensez a regarder ces sites très bien fait, ce sont des mines de trucs
et astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/
C:\Program Files\Microsoft Office\Office\1036\VBALIST.XLS
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Modeste
Bonsour®
JLuc wrote:
quelle boite de dialague dois je utiliser pour avoir que les repertoires ?


Heu .... ????
dans ta signature il existe un lien qui s'appelle Excelabo ....
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs et
astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/


;o)))
http://www.excelabo.net/xl/messages.php#choixdossier

@+

--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr
--
Feed Back
http://viadresse.com/?94912042

Avatar
JLuc
*Bonjour Modeste*,
Desole, c'est chaque fois la meme chose, je cherche dans l'aide et
quand je trouve pas je post alors que j'ai peut etre la reponse a ma
question sur un site que je recommande :/
Je suis vraiment impardonnable :')
Le probleme, c'est que faudra t'y faire, je tapotte plus vite que je
pense lol
Merci d'avoir essaye de me remettre sur le droit chemin rofl
Bonsour®
JLuc wrote:
quelle boite de dialague dois je utiliser pour avoir que les repertoires ?


Heu .... ????
dans ta signature il existe un lien qui s'appelle Excelabo ....
Pensez a regarder ces sites très bien fait, ce sont des mines de trucs et
astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/


;o)))
http://www.excelabo.net/xl/messages.php#choixdossier

@+

--
n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr



--
JLuc

Pensez a regarder ces sites très bien fait, ce sont des mines de trucs
et astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/
C:Program FilesMicrosoft OfficeOffice1036VBALIST.XLS


Avatar
jb
J'utilise ceci (à partir de la versiion 2002):

Sub arborescence()
racine = ChoixDossier() '
End Sub

Function ChoixDossier()
If Val(Application.Version) >= 10 Then
With Application.FileDialog(msoFileDialogFolderPicker)
.InitialFileName = ActiveWorkbook.Path & ""
.Show
If .SelectedItems.Count > 0 Then
ChoixDossier = .SelectedItems(1)
Else
ChoixDossier = ""
End If
End With
Else
ChoixDossier = InputBox("Répertoire?")
End If
End Function

Cordialement JB