PowerLooser Geschrieben 27. Juli 2009 Geschrieben 27. Juli 2009 Hallo Leuts... ich stehe mal wieder vor einem Problem, welches ich im Inet nicht googeln konnte. Zumindest habe ich keine zufriedenstellende Antwort gefunden! Ich habe im VB.net ein WebBrowser1 Controll, in dem ich mir ein Exceldokumet "test.xls" lade. Im Brosercontrol kann ich jetzt arbeiten und in dem Dokument auch schreiben etc. ! Dieses Dokument möchte ich dann zum Schluß speichern und eine Kopie davon als test1.xls in einem anderen Pfad ablegen. Meine bisherigen Versuche sind alle gescheitert! Hat jemand eine Idee? Wäre mehr als dankbar!!! Zitieren
JasonDelife Geschrieben 27. Juli 2009 Geschrieben 27. Juli 2009 Im WebBrowser läuft ja nicht Excel, sondern das Excel-ActiveX. Wenn dieses das speichern nicht erlaubt, kann man nicht speichern. Du musst mal danach suchen, das ist (galube ich) eine Einstellung des ActiveX. Grüße, JasonDelife. Zitieren
PowerLooser Geschrieben 28. Juli 2009 Autor Geschrieben 28. Juli 2009 (bearbeitet) Im WebBrowser läuft ja nicht Excel, sondern das Excel-ActiveX. Wenn dieses das speichern nicht erlaubt, kann man nicht speichern. Du musst mal danach suchen, das ist (galube ich) eine Einstellung des ActiveX. Grüße, JasonDelife. Thx für die Antwort! Habe deinen Gedanken aufgegriffen und es klappt!!! ' Es wird eine Toolbar zum dazugehörigen Dokument eingeblendet Dim temp1 As Object temp1 = "D:\Quelle\test.xls" 'Die eingegebenen Daten werden im Formular gespeichert Try Dim MyWeb As Object MyWeb = Me.WebBrowser1.ActiveXInstance 'MyWeb.ExecWB(Exec.OLECMDID_HIDETOOLBARS, ExecOpt.OLECMDEXECOPT_DONTPROMPTUSER) MyWeb.ExecWB(Exec.OLECMDID_SAVE, ExecOpt.OLECMDEXECOPT_DONTPROMPTUSER, temp1) 'MyWeb.ExecWB(Exec.OLECMDID_CLOSE, ExecOpt.OLECMDEXECOPT_DONTPROMPTUSER, temp1) Catch ex As Exception MsgBox("Error:" & ex.Message) End Try Bearbeitet 28. Juli 2009 von PowerLooser Zitieren
Empfohlene Beiträge
Dein Kommentar
Du kannst jetzt schreiben und Dich später registrieren. Wenn Du ein Konto hast, melde Dich jetzt an, um unter Deinem Benutzernamen zu schreiben.