this worked for me:
Sub ABC()
Set ObjExcelRep = ActiveWorkbook
intCellIndexRow = 5
MonthNoOfDays = Day(DateSerial( _
Year(Date), Month(Date) + 1, 0))
ObjExcelRep.Activate
ObjExcelRep.Worksheets("DataMatrix").Select
ObjExcelRep.Worksheets("DataMatrix") _
.Cells(intCellIndexRow, 1) = Month(Date) & "/01/" _
& Year(Date)
ObjExcelRep.Worksheets("DataMatrix") _
.Cells(intCellIndexRow, 1).Select
strRange = "A" & intCellIndexRow & ":A" & _
intCellIndexRow + MonthNoOfDays - 1
Selection.AutoFill Destination:=Range(strRange), _
Type:=xlFillDays
End Sub
--
Regards,
Tom Ogilvy
"maverick2005"
wrote in message
news:maverick2005.1ubmqj_1124975155.7962@excelforu m-nospam.com...
I tried this
Range("A" & intCellIndexRow).AutoFill
Destination:=objExcelRep1.Worksheets("DataMatrix") .Range(strRange),
Type:=xlFillDays
and still it throws me the same "_global" error.
Thanks,
John
--
maverick2005
------------------------------------------------------------------------
maverick2005's Profile:
http://www.excelforum.com/member.php...o&userid=26627
View this thread: http://www.excelforum.com/showthread...hreadid=399026