Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

hyperlink



Excel-Version: 10.0 (Office XP)

Betrifft: hyperlink
von: andré
Geschrieben am: 06.06.2002 - 15:18:50

hallo!

ich hab einen cmd und mit dem möchte ich eine visio datei ganz normal mit visio aufmachen.

wer kann mir den befehl sagen?

danke im vorraus


  

Re: hyperlink
von: Stefan
Geschrieben am: 07.06.2002 - 04:36:16

Hallo André!

Probier doch mal die API-Funktion "ShellExecute"


Private Declare Function ShellExecute Lib "shell32.dll" _
        Alias "ShellExecuteA" (ByVal hwnd As Long, _
        ByVal lpszOp As String, ByVal lpszFile As String, _
        ByVal lpszParams As String, ByVal LpszDir As String, _
        ByVal FsShowCmd As Long) As Long

Du ruft sie folgendermaßen auf:

Private Sub CommandButton1_Click()
    strFilename = "MeinDokument.doc"
    strPath = "C:\"
    bOpen = ShellExecute(Application.hwnd, "Open", _
        strFilename, "", strPath, 1)
End Sub

ShellExecute öffnet die Dateien immer mit dem der Dateiendung zugeordneten Programm.

Gruß

Stefan



 

Beiträge aus den Excel-Beispielen zum Thema "hyperlink"