Skip to Content
0
Former Member
Apr 22, 2018 at 12:42 AM

worksheet in basis(1) excel is not generating and excel went to not responding state.

2003 Views Last edit Apr 22, 2018 at 06:40 AM 2 rev

All your codes are really awesome. I learned a lot of new things from you and trying to explore more from you.

Am using your below code in my Excel VBA module which was posted on Nov 8, 2013 to download excel in XXL format from SAP.

'Here follow the new commands.
SAP_Workbook = "worksheet in basis (1)"
EXCEL_Path = "z:\tmp\"
myWorkbook = "myWorkbook.xlsx"
on error resume next
do
err.clear
Set xclApp = GetObject(, "Excel.Application")
If Err.Number = 0 Then exit do
'msgbox "Wait for Excel session"
wscript.sleep 2000
loop
do 
err.clear
Set xclwbk = xclApp.Workbooks.Item(SAP_Workbook)
If Err.Number = 0 Then exit do
'msgbox "Wait for SAP workbook"
wscript.sleep 2000
loop
on error goto 0
Set xclSheet = xclwbk.Worksheets(1)
xclApp.Visible = True
xclapp.DisplayAlerts = false

xclapp.ActiveWorkbook.SaveAs EXCEL_Path & myWorkbook 
xclapp.ActiveWorkbook.Close
Set xclwbk = Nothing
Set xclsheet = Nothing
'xclapp.Quit
set xclapp = Nothing

https://archive.sap.com/discussions/thread/3450067

It worked well previously, now am facing one issue in this.

"Save the data in the spreadsheet" dialog box pops up , and script halts and the worksheet in basis(1) excel is not generating and excel went to not responding state.

And suggestion or solution to overcome this will be really helpful.

Thanks in advance,

Jagadesh K.