Microsoft Excel

Herbers Excel/VBA-Archiv

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

Chm-Datei über Makro öffnen

Betrifft: Chm-Datei über Makro öffnen von: Jörg
Geschrieben am: 06.09.2004 10:36:00

Guten Morgen leibe Leute,

ich habe da so ein kleines Problem ;-)
Ich möchte über folgenden Befehl eine CHM-Datei öffnen ,
bekomme aber eine Meldung das die Datei nicht gefunden werden kann.
Diese ist aber da.

Code:
Public

Sub Hilfe()
Dim strDir As String
strDir = CurDir
ChDir "c:\eigene dateien\"
Shell "hh.exe FB0111-Hilfe.chm", vbMaximizedFocus
ChDir strDir
End Sub


Gruß Jörg
  


Betrifft: AW: Chm-Datei über Makro öffnen von: Bert
Geschrieben am: 06.09.2004 12:05:51

Sehr seltsame Syntax:

Shell "hh.exe mk:@MSITStore:" & "FB0111-Hilfe.chm", vbMaximizedFocus

Bert


  


Betrifft: AW: Chm-Datei über Makro öffnen von: Jörg
Geschrieben am: 07.09.2004 09:56:05

Bringt leider immer ncoh den Fehler nun aber mit mk:....

Wie sollte den der Befehl den richtig aussehen?

Gruß Jörg


  


Betrifft: AW: Chm-Datei über Makro öffnen von: Björn B.
Geschrieben am: 10.09.2004 22:19:19

Hallo Jörg,

bei mir funktioniert dein Code einwandfrei.

Mir fallen eigentlich nur zwei mögliche Fehlerquellen ein:

1. Ist die FB0111-Hilfe.chm wirklich in dem angegebenen Pfad mit genau diesem Namen gespeichert?

2. Ist die hh.exe vorhanden und mit der Umgebungsvariable Path der Pfad auf das Verzeichnis gesetzt, in dem sie sich befindet?

Gruß
Björn


  


Betrifft: AW: Chm-Datei über Makro öffnen von: Jörgg
Geschrieben am: 23.09.2004 17:01:56

Habe eine Lösung gefunden:

Dim sFile As String
sFile = "c:\eigene dateien\FB0111-Hilfe.chm"
If Dir(sFile) <> "" Then
Shell "hh.exe """ & sFile & """,vbMaximizedFocus"
Else
MsgBox "Datei konnte nicht gefunden werden"
End If
End Sub

Damit klappt es. Danke für die Hilfe !

Gruß Jörg


  


Betrifft: AW: Chm-Datei über Makro öffnen von: Andreas Emmert
Geschrieben am: 10.09.2004 22:19:45

Hallo Jörg,

hast du's schon mal mit der direkten Pfadangabe im Befehl versucht? Also so in etwa:

Shell "hh.exe C:\Eigene Dateien\FB0111-Hilfe.chm", vbMaximizedFocus

So kenne ich zumindest den Aufruf, und der hat bisher eigentlich immer funktioniert ...

Grüße

Andreas