-> Hier kostenlos registrieren
Hallo,
ich beschäftige mich etwas mit VBS für WinCCflex 2008. Und habe diesen Code in der Hilfe gefunden:
Dim ExcelTabelle[FONT="]Set ExcelTabelle = CreateObject("Excel.Sheet")[/FONT]
' Excel über das Application-Objekt sichtbar machen.
ExcelTabelle.Application.Visible = True
'Text in die ersten Zelle der Tabelle einfügen.
ExcelTabelle.ActiveSheet.Cells(1,1).Value = "Das ist Spalte A, Zeile 1"
' Tabelle speichern.
ExcelTabelle.SaveAs "C:\Eigene Dateien\TEST.XLS"
' Excel über die Quit-Methode des Application-Objekts beenden.
ExcelTabelle.Application.Quit
' Objektvariable freigeben.
Set ExcelTabelle = Nothing
Bin jetzt davon ganz Blauäugig ausgegangen das das Funktioniert. Habe diese Funktion auf einen Schaltfläche gelegt.
Was ist den da nicht richtig????????????
ich beschäftige mich etwas mit VBS für WinCCflex 2008. Und habe diesen Code in der Hilfe gefunden:
Dim ExcelTabelle[FONT="]Set ExcelTabelle = CreateObject("Excel.Sheet")[/FONT]
' Excel über das Application-Objekt sichtbar machen.
ExcelTabelle.Application.Visible = True
'Text in die ersten Zelle der Tabelle einfügen.
ExcelTabelle.ActiveSheet.Cells(1,1).Value = "Das ist Spalte A, Zeile 1"
' Tabelle speichern.
ExcelTabelle.SaveAs "C:\Eigene Dateien\TEST.XLS"
' Excel über die Quit-Methode des Application-Objekts beenden.
ExcelTabelle.Application.Quit
' Objektvariable freigeben.
Set ExcelTabelle = Nothing
Bin jetzt davon ganz Blauäugig ausgegangen das das Funktioniert. Habe diese Funktion auf einen Schaltfläche gelegt.
Was ist den da nicht richtig????????????
Zuletzt bearbeitet: