Hi All,
I have following returning Run-time Error type 13. Type mismatch. I don't understand why?
dim WFMBlock1 as string
dim WFMDR1 as variant
dim Block1S , Block1E as long
Block1S=2
Block1E=19
WFMBlock1 = ActiveWorkbook.ActiveSheet.Range(Cells(5, Block1S), Cells(36, Block1E)).Address
WFMDR1 = ActiveWorkbook.ActiveSheet.Range(WFMBlock1)
I have following returning Run-time Error type 13. Type mismatch. I don't understand why?
dim WFMBlock1 as string
dim WFMDR1 as variant
dim Block1S , Block1E as long
Block1S=2
Block1E=19
WFMBlock1 = ActiveWorkbook.ActiveSheet.Range(Cells(5, Block1S), Cells(36, Block1E)).Address
WFMDR1 = ActiveWorkbook.ActiveSheet.Range(WFMBlock1)