View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 6,953
Default Type Mismatch!!!

Perhaps a little testing:

Dim CopyEventDateCell As Date
Dim MyRow as Long
Dim rng as Range
MyRow = 2

set rng = Workbooks("IT Operations Summarized Change
Report TEST.xls").Worksheets("IT Operations").Cells(MyRow, 6)

msgbox typename(rng.value) & ", " & isdate(rng.value)

--
Regards,
Tom Ogilvy

"sbowman" wrote:

Okay so I'm a little rusty on my Excel VBA skills and I can't figure
out why I'm getting a type mismatch error for the following line in my
code:

Dim CopyEventDateCell As Date
Dim MyRow as integer
MyRow = 2

CopyEventDateCell = Workbooks("IT Operations Summarized Change
Report TEST.xls").Worksheets("IT Operations").Cells(MyRow, 6).Value

The only thing I can think of is it's an issue with the date format?
The cell value I'm referencing is in date format...I'm baffled, help!!!

Thanks,
Shelley