Forum Discussion
ArmandsBruns
14 years agoFrequent Contributor
Hi Jay,
Thanks for your response
my solution:
--------------------------------------------------
Dim MSExxcel
Set MSExcel = Sys.OleObject("Excel.Application")
MSExcel.Visible = True
If Utilities.FileExists("D:\LTT_Rezultati_IE.xls") Then
MSExcel.ActiveWorkbook.Save ' Save
MSExcel.Quit()
Else
MSExcel.ActiveWorkbook.SaveAs "D:\LTT_Rezultati_IE.xls" ' Save As
MSExcel.Quit()
End If
--------------------------------------------------------
Årmands
Thanks for your response
my solution:
--------------------------------------------------
Dim MSExxcel
Set MSExcel = Sys.OleObject("Excel.Application")
MSExcel.Visible = True
If Utilities.FileExists("D:\LTT_Rezultati_IE.xls") Then
MSExcel.ActiveWorkbook.Save ' Save
MSExcel.Quit()
Else
MSExcel.ActiveWorkbook.SaveAs "D:\LTT_Rezultati_IE.xls" ' Save As
MSExcel.Quit()
End If
--------------------------------------------------------
Årmands