Changer le nom du chemin d'un fichier à importé

Résolu/Fermé
Maland_1969 - 16 mars 2020 à 16:49
 Maland_1969 - 25 mars 2020 à 09:48
Bonsoir,
J'ai un FileDialog qui s'ouvre pour sélectionner un dossier voici le code:

Private Sub cmdChemDossier_Click()
'---
'SELECTION D'UN DOSSIER
'---
Dim fd As Office.FileDialog

'Créer un objet FileDialog
Set fd = Application.FileDialog(msoFileDialogFolderPicker)

'Titre de la boîte
fd.Title = "AMIIS PRO-VI: Sélectionnez un dossier..."

'Texte du bouton
fd.ButtonName = "Sélectionner"

'Type de vue au départ
fd.InitialView = msoFileDialogViewLargeIcons

'Afficher la boîte et traiter le résultat
If fd.Show() Then
Me.CheminDestin = fd.SelectedItems(1)
MsgBox "Vous avez sélectionné le dossier :" & vbCrLf & fd.SelectedItems(1), vbInformation, "AMIIS PRO-VI"
End If

Set fd = Nothing

End Sub

Mais le selection affiche le chemin d'un dossier sous cette forme

C:\Users\HP\Desktop

alors que moi je le voudrais sous cette forme

C:\Users\HP\Desktop\

Pouvez vous m'aider?

Merci
A voir également:

5 réponses

yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476
16 mars 2020 à 17:57
dim mauvaischemin as string, bonchemin as string
mauvaischemin = "C:\Users\HP\Desktop"
bonchemin = mauvaischemin + "\"  
1
Maland_1969
17 mars 2020 à 18:33
J'aimerai vous envoyer ma base de données pour que vous voyez de près ce qu'il en n'est
0
yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476
20 mars 2020 à 18:41
peux-tu fermer cette discussion, si tu n'as pas d'autre question?
0
Maland_1969
24 mars 2020 à 14:52
Bonjour,
Comment fermer une discussion?
Merci
0
yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476
24 mars 2020 à 15:37
via le gros bouton vert "marquer comme résolu".
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Maland_1969
25 mars 2020 à 09:48
Bonjour,
bèh, je ne trouve pas ce gros bouton vert.
merci
0