WebBrowser1.Go Back, GoForward ....
13.11.2004 11:10:07
Stefan
Ich habe einen WebBrowser1 in mein Excel integriert. Das ganze mit ComboBoxen usw. zusammengebaut und das läuft einwandfrei. Nun möchte ich gerne das Ganze noch etwas verbessern und habe deshalb nachfolgende Code eingebaut. Das Ganze tut auch durchwegs. Nur wenn eine Situation nicht zutrifft, gibt es eine Fehlermeldung. Meine Frage ist, wie könnte man das professoneller habe, als nur On Error resume next? Danke für jeden Hinweis.
Grüsse
Stefan
Private Sub CommandButton1_Click()
WebBrowser1.GoBack '()
End Sub
Private Sub CommandButton2_Click()
WebBrowser1.GoForward
End Sub
Private Sub CommandButton3_Click()
WebBrowser1.GoHome
End Sub
Private Sub CommandButton4_Click()
WebBrowser1.Refresh
End Sub
Private Sub CommandButton5_Click()
WebBrowser1.Stop
End Sub
Anzeige