Skip to Content

Register Login

Default Header

(header konnte nicht geladen werden)

Navigation

How to print excel file from wincc?

Created by: balba at: 11/3/2008 12:52 AM (3 Replies)

Rating (0)

Thanks 1

4 Entries

11/3/2008 12:52 AM	Rate (0)
balba Posts: 6 Rating: (0)	Hello, i'm transfering data from userarchive to excel file, and that is working great.. i was wandering is it possible, and how, to print that excel file from wincc? for example when i press the button, that the script open excel file and send it to print... thanks in advance...
balba Posts: 6 Rating: (0)
Suggestion To thank Quote Answer

11/3/2008 10:55 AM	Rate (0)
Tubbie Posts: 52 Rating: (3)	how is your userarchive-file named? is it always the same name?
Tubbie Posts: 52 Rating: (3)	Last edited by: Tubbie at: 11/3/2008 11:42 AM
Suggestion To thank Quote Answer

11/3/2008 2:00 PM	Rate (0)
JMJ Posts: 487 Rating: (45)	I do not know how you are naming the excel file. Assuming it is always the same, I am giving a sample code. [code]Dim objExcelApp Dim objWorkSheet '--------------------- Set objExcelApp = CreateObject("Excel.Application") objExcelApp.Visible = True 'Set False if you do not want to see Excel opening 'Replace ExcelExample.xls with actual file name. 'Replace <path> with the real path of the file. objExcelApp.Workbooks.Open "<path>\ExcelExample.xls" set objWorkSheet = objExcelApp.Activeworkbook.Worksheets(1) objWorkSheet.PrintOut '------------------- 'Close Excel and reset all objects objExcelApp.Workbooks.Close objExcelApp.Quit Set objWorkSheet= Nothing Set objExcelApp = Nothing[/code]
JMJ Posts: 487 Rating: (45)	Last edited by: JMJ at: 11/3/2008 2:00 PM
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users vebernasconi

11/3/2008 3:13 PM	Rate (0)
balba Posts: 6 Rating: (0)	hi.. userarchive is always the same name, but the excel file isn't.... every day is new report (new excel file) and the name is date on which it is made... thanx for fast replay!! it is very usefull regards
balba Posts: 6 Rating: (0)
Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Follow us on