Vraagje over vba

[ThimSnels]

Hey,

Ik zou graag een via een knop op een userform, windowsverkenner openen, met de mogelijkheid om een laad knop en exit knop.
Indien ik dit doe met Shell command, dan gaat enkel de verkenner open.

Bedoeling is om een popup te krijgen net zoals je krijgt wanneer je in excel bestand openen klikt.

Een bestand selecteren en dan de link naar dit bestand printen op het usersform. Dus het bestand zelf niet openen.

Iemand een idee of dit mogelijk is?

Alvast bedankt

 

[OctaFish]

Met Shell schiet je inderdaad niet zoveel op; je moet het dialoogvenster FileOpen aanroepen. Bijvoorbeeld zo:

    Set dlgPicker = Application.FileDialog(msoFileDialogFilePicker)
    
    With dlgPicker
        .Title = "Selecteer een bestand." 'De titel voor het venster
        '**************************************************************************
        'Pas dit aan voor map met afbeeldingen
        '**************************************************************************
        .InitialFileName = CurrentProject.Path      'Waar moet het venster beginnen?
        .Filters.Add "PDF", "*.pdf", 1              'Beperk de bestandstypes tot .pdf, en maak dat het eerste item in de lijst
        .Filters.Add "DOC", "*.doc"
        .FilterIndex = 2
        .AllowMultiSelect = False                   'Slechts één bestand kiezen toegestaan
        .InitialView = msoFileDialogViewList        'Bepaal weergave
        If .Show = -1 Then                          'Bepaal of gebruiker op OK-knop heeft geklikt.
            strFileName = .SelectedItems.Item(1)    'String wordt gevuld met geselecteerde bestand
        End If
    End With

 

[ThimSnels]

Bedankt voor de snelle reactie,

Weet je misschien volgende ook.

Als het popup nu open gaat staat er op de knop openen, is het mogelijk hier de tekst te veranderen naar selecteren?

Alvast bedankt

 

[Warme bakkertje]

Als jij de broncode van XL kan wijzigen, dan wel
Dit is een standaardvenster in XL dus dat kan je spijtig genoeg niet wijzigen.

 

[alphamax]

.buttonname = "selecteren"

nadeel: de tekst op de button verander pas van "open" naar "selecteren" wanneer daadwerkelijk een bestand geselecteerd is