View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Shetty Shetty is offline
external usenet poster
 
Posts: 78
Default Activeworkbook.range --- Not supported by VBScript?

Hi all,
I have a small script running at each startup and shutdown.
At the runtime, it gives error that --- Object doesn't support this property or
method; 'Activeworkbook.range' <---
Any Help is appreciated.
Regards,
Shetty.

So far I have the following.

Dim objXL
Dim objWkB
Dim i
Dim Dr

Set objXL = wscript.CreateObject("Excel.Application")
objXL.Visible = False
Set objWkB = objXL.WorkBooks.Open("c:\123\time.xls")

objXL.activeworkbook.Range("A65536").End(xlUp).Off set(1, 0).select
objXL.activeworkbook.ActiveCell.Value = Date
objXL.activeworkbook.ActiveCell.Offset(0, 1).Value = Time

objXL.activeworkbook.save
objXL.activeworkbook.Close' Close WorkBook
objXL.Visible = True
objXL.Quit 'Quit Excel