Avatar billede phuc69 Juniormester
07. december 2006 - 09:04 Der er 4 kommentarer og
1 løsning

Start i bestemt mappe

jeg bryger følgende kode til at finde en fil
.GetOpenFilename("Text Files (*.txt), *.txt", , "Vælg Filer", , True)

Hvordan man rette koden således at den åbner i mappen c:\test\test
Avatar billede learningvba Nybegynder
07. december 2006 - 10:18 #1
Prøv med:

  ChDrive "C:"
  ChDir "C:\test\test\"
  .GetOpenFilename("Text Files (*.txt), *.txt", , "Vælg Filer", , True)
Avatar billede phuc69 Juniormester
07. december 2006 - 11:32 #2
Det kan jeg ikke få til at virke
Avatar billede learningvba Nybegynder
07. december 2006 - 13:00 #3
Jeg var ikke tydelig nok, beklager.
Du skal sætte
ChDrive "C:"
ChDir "C:\test\test"
ind før du kalder .GetOpenFileName

Dvs. noget i stil med:
Sub OpenF()
  Dim SvarFraGetOpenFileName As String
  ChDrive "C:"
  ChDir "C:\temp"
  SvarFraGetOpenFileName = Application.GetOpenFilename("Text Files (*.txt), *.txt", , "Vælg Filer", , True)
End Sub

Håber det hjalp?
Avatar billede phuc69 Juniormester
07. december 2006 - 13:58 #4
Tak,. så virker det
smid et svar
Avatar billede learningvba Nybegynder
12. december 2006 - 07:34 #5
Godt det kom til at virke :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester