Bruger skal vælge directory

Denne her virker for mig...

http://j-walk.com/ss/excel/tips/tip29.htm

Slap af for en smøre - er der ikke en nemmere vej?

Det kan være der er andre med mere forstand på VB, der har en nemmere måde
- jeg har ikke flere forslag.

engberg >>Nej men den virker, og api er altid hurtigste vej farm for en eller anden ocx-file genvej

og så er det en da en lille kode frem for den jeg ville give dig ;-)

Kan du ikke bruge kontrollerne:
DriveListbox og DirListbox

Der er vel ingen grund til at gøre det mere kompliceret end nødvendigt?

Når du nu allerede bruger CommonDialog, vil jeg foreslå at du holder dig til den.

Hvis du kun vil have STIEN ud af Commondialog.Filename, er det blot et spørgsmål om lidt strengemanipulation - brug funktionerne InStr, Mid, Left, Right osv. på en kreativ måde. Commondialog.Filename er jo en string, og alt før det sidste "\" er stien - alt efter er filnavnet.

Du kan gøre således - muligvis kan du selv finde på en mere elegant metode:

  Dim strKunSti As String
  Dim i As Integer
  For i = 1 To Len(CommonDialog.FileName)
    If Mid(CommonDialog.FileName, Len(CommonDialog.FileName ) - i, 1) = "\" _
    Then Exit For 'Tæller fra bagende
  Next i
  strKunSti = Left(CommonDialog.FileName, Len(CommonDialog.FileName) - i - 1)

hvad hvis der ikke er nogle filer i det biblotek, så kan man jo ikke trykke ok.

martin_moth>> Det ser ud som en rigtig god måde, men:
sjh>> Du har en pointe...

shj & engberg: Nej, man kan ikke trykke OK hvis der ikke er nogle filer. Jeg går ud fra, at når der bruges en "åben fil" dialog (commondialog), er det fordi man faktisk vil åbne en fil - altså vil der være en fil i mappen brugeren vælger. Ellers er der vel ingen grund til at vælge at bruge commondialog, brug da svaret fra peter.eriksen, der således vil være perfekt for dig :O)

Jeg brugte peter.erikse's løsning, men mit spørgsmål, som det var stillet, blev egentlig bedst besvaret af martin_moth... :-)