Discussion :

[texas2607]

Salut à tous,
Afin d'ouvrir une boite de dialogue pour récupérer un fichier, j'ai pris sur la faq le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim fileName As String
    Dim result As Integer
 
    With Application.FileDialog(msoFileDialogFilePicker)
        .Title = "Sélectionner le fichier ou se trouvent les données à importer"
        .Filters.Add "Fichiers Mdb", "*.mdb"
        .FilterIndex = 1
        .AllowMultiSelect = False
        .InitialFileName = CurrentProject.path
        result = .Show
        If (result <> 0) Then
            fileName = Trim(.SelectedItems.Item(1))
            MsgBox (Mid(fileName, Len(fileName), Len(.SelectedItems.Item(1))))
        End If
    End With

Cela me récupère le chemin+nom du fichier mais pourriez vous me dire quelle ligne rajouter afin d'avoir également le nom du fichier seul ( sans le chemin).

Merci de votre aide
Amicalement
Fred

[Lou Pitchoun]

Salut,

Avec cette Q/R tu as ce qu'il te faut
http://access.developpez.com/faq/?pa...#AffBoitDialog

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    'TypeRetour (Définit la valeur, de type String, renvoyée par la fonction)
        '1 = Chemin complet + Nom du fichier
        '2 = Nom fichier seulement

[texas2607]

Ouah, alors là je suis pommé. J'avais trouver ce bout de code "simple" c'est pour cela que je l'avais récupéré mais le lien que tu viens de me faire passer.....

N'y a t'il pas d'autre solution que de changer la totalité de mon code. Ce que j'aimerais c'est que ma variable 'FileName' me donne le nom du fichier, mais entre désir et avoir.....

[Lou Pitchoun]

Je ne vois pas ce qu'il y a de plus difficile entre modifier un code pour qu'il fasse ce que l'on veut et changer un 1 en 2 pour faire automatiquement ce que l'on souhaite...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox OuvrirUnFichier(Me.Hwnd, "Parcourir", 2, "Fichiers Mdb", "mdb")

[texas2607]

Nickel, ça fonctionne, Merci beaucoup !!!
Amicalement
Fred

[texas2607]

Salut à tous
J'avais marqué [Résolu] car effectivement le code de Lou Pitchoun fonctionne à merveille.

Par contre ce matin j'ai continué à développer mon appli et je me retrouve confronté au problème suivant:
J'ai bien récupéré le nom du fichier en mettant 'TypeRetour 2' mais dans mon appli j'ai également besoin d'avoir le chemin+nom (TypeRetour 1), y a t'il un moyen de sortir les 2 ( une variable qui aurait le nom et une avec le chemin+nom) à partir d'une sélection unique de fichier faites par l'utilisateur ?