I have the following macro. Unfortunately the crawl.exe needs a double click to excecute. But I cant make it work.
Can anyone help?
Sub OpenWorkbookToVariable()
Dim wb As Workbook
Set wb = Workbooks.Open("C:\Users\61458\Desktop\TEST\Windows32\input.xlsx")
ActiveWorkbook.Save
ActiveWorkbook.Close ("C:\Users\61458\Desktop\TEST\Windows32\input.xlsx")
Shell "C:\Users\61458\Desktop\TEST\Windows32\crawl.exe", vbNormalFocus
Shell "C:\Users\61458\Desktop\TEST\Windows32\crawl.exe", vbNormalFocus
End Sub
regards
Ged
Can anyone help?
Sub OpenWorkbookToVariable()
Dim wb As Workbook
Set wb = Workbooks.Open("C:\Users\61458\Desktop\TEST\Windows32\input.xlsx")
ActiveWorkbook.Save
ActiveWorkbook.Close ("C:\Users\61458\Desktop\TEST\Windows32\input.xlsx")
Shell "C:\Users\61458\Desktop\TEST\Windows32\crawl.exe", vbNormalFocus
Shell "C:\Users\61458\Desktop\TEST\Windows32\crawl.exe", vbNormalFocus
End Sub
regards
Ged