Bestand openen met "shell"?

Status
Niet open voor verdere reacties.

Jan Van Haaren

Gebruiker
Lid geworden
27 okt 2002
Berichten
202
Hoi,

Ik wil een extern bestand openen met mijn VBA programma, maar het lukt allemaal niet :).
Ipv shell("c:\blabla") zou ik op de plaats van de bestandsnaam iets willen zodat het het pad leest uit Path.Text. In Path.Text staat het pad dus naar het bestand dat ik wil openen, maar hoe kan ik dat nu oplossen?

Dank bij voorbaat, Jan!
 
iets duidelijk graag, want snap er nog niet veel van.

En is wel makkelijk als je iets van voorbeeld code toevoegd.
 
uhh

Shell Path.Text

Denk dat je dit bedoeld...

Mvg,
 
Waarom niet een CommonDialog control gebruiken?

Hallo,

Probeer dit maar even uit, dan kun je zien of je datgene
wilt bereiken ook op deze manier kan. Het betreft hier
het openen v.e. tekst bestand met behulp van Notepad. Je kunt
dit eventueel wijzigen.


1) Plaats een CommonDialog control en een button op het Form.

2) De code hieronder is voor de button.

Code:
Private Sub Command1_Click()
   'Als je op Cancel klikt
   CommonDialog1.CancelError = True
   On Error GoTo ErrHandler
   'Vlaggetjes
   CommonDialog1.Flags = cdlOFNHideReadOnly
   'Filters
   CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _
   "(*.txt)|*.txt|Batch Files (*.bat)|*.bat"
   'Standaard filter specificeren
   CommonDialog1.FilterIndex = 2
   ' Toon de Open dialog-box
   CommonDialog1.ShowOpen
   ' Op dit punt is het pad en het
   ' geselecteerde bestand bekend, ze zitten in
   ' de variabele "CommonDialog1.FileName"
   Shell "C:\WINDOWS\NOTEPAD.EXE" & " " & CommonDialog1.FileName
   Exit Sub
ErrHandler:
   'Je zult hier belanden, indien je op de
   'Cancel-toets hebt geklikt.
   Exit Sub
End Sub

3) run het programma.

Suc6.

P.S. Het CommonDialog control heet onder Components
"Microsoft Common Dialog COntrol 6.0"
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan