Script: Excel-Report via Script aufrufen

Inhalt

Das Script ruft einen Excel-Report auf und führt das Makro DoReport aus.

Der Excel-Report muss sich im Verzeichnis befinden, welches Sie in den Vertec Systemeinstellungen unter Vorlagenpfad fuer Word-Berichte eingetragen haben. Der Dateiname muss im Script angegeben werden.

Normalerweise werden Excel-Reports wie Word-Report direkt aus Vertec gestartet (Menü Drucken > Report), der Umweg via Script ist nicht nötig. Es kann aber sein, dass vor oder nach dem Starten des Reports noch Bearbeitungen vorgenommen werden müssen. Diese können dann ebenfalls im Script erfolgen.

Version

VersionBeschreibungScript
Versionen vor 5.8

AufrufExcelJournal.txt
ab Version 5.8
Verwendet anstelle der VB Standardfunktion die Vertec-Funktion msgbox (siehe dazu msgbox/inputbox: Beschreibung der Parameter) AufrufExcelJournal58.txt

Ausführen

Je nach Vorgaben des entsprechenden Excel-Reports.

Scripttext

'---Bezeichnung: Excel-Report via Script aufrufen
'   Klassen: BusinessClassesRoot
'   ObjectScript: Yes
'   ContainerScript: Yes
'   EventType: Kein
'---Das Script ruft einen Excel-Report auf und führt das
'   Makro DoReport aus. Der Excel-Report muss sich im Verzeichnis
'   befinden, welches Sie in den Vertec Systemeinstellungen unter
'   Vorlagenpfad fuer Word-Berichte eingetragen haben.
'---Im Script muss der Name des aufzurufenden Reports entsprechend
'   angepasst werden.
'---02.06.2008, Vertec AG: Als Scriptfile erstellt
'---25.10.2013, sr: msgox auf vertec.msgbox geändert

option explicit

Dim Excel
Dim TemplatePath
Dim Document

TemplatePath = Vertec.eval("Property.allInstances->select"_
&"(propertyName = 'GlobalWordTemplatePath')->first.asstring")

if TemplatePath <> "" then
TemplatePath = TemplatePath + "\MeinExcelReport.xlt"
Set Excel = CreateObject("Excel.Application")
Excel.Visible = true
Set Document = Excel.Workbooks.Add(TemplatePath)
Excel.Run("DoReport")
else
vertec.msgbox "Vorlagenpfad nicht gefunden"
end if


03.02.2004 | 25.10.2013: msgox auf vertec.msgbox geändert. Altes und neues Script zur Verfügung gestellt.
Produktlinien: Expert
Module: Leistung & CRM