map open en juiste bestanden zien

[Ben]

Heb een vba geschreven om een excel bestand op te slaan als pdf, nu wil ik deze controleren of de file wel in de juiste map staat.
De vba code open de map met alle excel bestanden maar ik moet dan ieder keer aangeven dat deze map alle bestanden laat zien zoals xlx en pdf.
Heeft iemand misschien een oplossing voor dit laatste.

Bekijk bijlage code bestands map openen.xlsm

Groetjes Ben

 

[edmoor]

Uit je relaas begrijp ik niet of je nu alle bestanden wilt zien of alleen Excel en PDF documenten.
Maar er eens dit van:

Sub MapOpen()
    With Application.FileDialog(msoFileDialogFilePicker)
        .Title = "Selecteer een bestand"
        .InitialFileName = ActiveWorkbook.Path
        .Filters.Add "Excel en PDF bestanden", "*.xls*;*.pdf"
        If .Show = True Then
            MsgBox .SelectedItems(1)
        End If
    End With
End Sub

 

[VenA]

Welke code gebruik je dan? In het bestand staat niet veel wat met de vraag te maken heeft.

 

[Ben]

Het werkt

Nogmaals edmoor dank je wel deze werkt prima.
Dit is wat ik zocht.
zal deze ook goed bestuderen.
En ook VenA ook bedankt, ik dacht dat deze code wel voldoende was.
Zal de volgende keer proberen wat duidelijker te zijn.