ich möchte Excel als "PrintEngine" nutzen.
Dazu übergebe ich Daten aus einem ListIcon via Clipoboad an Excel - soweit kein Problem.
Allerdings läuft die Print Methode "in Leere" (Fehlermeldung aus Debug s. u.a. CodesSnip)
Was mache ich da falsch ?
Btw, habe ich auch noch eine Frage zur Quit Methode:
Welche(n) Parameter muß ich der Methode wie übergeben, damit der Speicherndialog NICHT erscheint ?
Bin für jeden Hinweis dankbar
Code: Alles auswählen
XIncludeFile "COMatePLUS.pbi"
XIncludeFile "ExcelConstants.pbi"
Define.COMateObject ExcelObject, WorkBook
ExcelObject = COMate_CreateObject("Excel.Application")
If ExcelObject
If ExcelObject\SetProperty("Visible = #True") = #S_OK
WorkBook = ExcelObject\GetObjectProperty("Workbooks\Add")
If WorkBook
ExcelObject\Invoke("ActiveSheet\Paste")
ExcelObject\Invoke("ActiveSheet\Print()")
Debug COMate_GetLastErrorDescription()
;Method/property not supported by this object.
ExcelObject\Invoke("Quit()")
WorkBook\Release()
EndIf
EndIf
ExcelObject\Release()
Else
MessageRequester("Drucken nicht möglich", "COMatePlus Error!")
EndIf