Ændring af path i Common Dialog
Styresystem: Win 2000 og XP.Beskrivelse:
Jeg er i gang med et projekt, hvor der først importeres eksterne data til et regneark i Excel.
Disse data gennem går derefter adskillige beregninger og spredes ud i 15-20 regnark i projektmappen.
Når beregningerne er slut, kopieres de relevante resultater over i Word, som en endelig rapport til slutbruger.
Undervejs kan bruger foretage en række valg, som præsenteres i 5-6 dialogbokse.
Det meste er styret af VBA.
Spørgsmål:
I en dialogboks vælger man via en knap til Common Dialog henholdsvis sti og fil for den skabelon, man ønsker at bruge i Word.
Jeg får hele tiden den sidst brugte sti op som default OGSÅ selv om jeg lige før CommonDialog1.ShowOpen bruger InitDir dvs at jeg oiplever at InitDir IKKE har nogen virkning.
Jeg har tidligere prøvet ChDir også uden virkning.
Her er koden:
Private Sub cmdGennemse1_Click()
CommonDialog1.InitDir = "C:\Program Files\Microsoft Office\Templates\1033\Eget design"
CommonDialog1.ShowOpen
txtStiSkabeloner.Value = Sti(CommonDialog1.Filename, "\")
End Sub
”Sti” er en funktion, som udtrækker stien af strengen.