Guest User

Untitled

a guest
Jul 22nd, 2018
75
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.28 KB | None | 0 0
  1. set DIR="X:SYSTEMMAKROS"
  2. X:
  3. cd %DIR%
  4. start /wait EXCEL.EXE /e-GENERATE_REPORTS BSYSTEM.XLA
  5.  
  6. set xlApp = CreateObject("Excel.Application")
  7. xlApp.Visible = True
  8. set xlBook = xlApp.Workbooks.Open("X:SYSTEMMAKROSBSYSTEM.XLA")
  9. xlBook.Run "GENERATE_REPORTS"
  10. xlBook.Close
  11. xlApp.Quit
Add Comment
Please, Sign In to add comment