ExcelBanter - Error 450

ExcelBanter (https://www.excelbanter.com/)

- Excel Programming (https://www.excelbanter.com/excel-programming/)

- - Error 450 (https://www.excelbanter.com/excel-programming/324045-error-450-a.html)

I just tried the following and recieved an Error 450:

ChkbxArray(0, 4) = ActiveSheet.Comments
ChkbxArray(1, 4) = ActiveSheet.UsedRange
ChkbxArray(2, 4) = ActiveSheet.UsedRange
ChkbxArray(3, 4) = ActiveSheet.UsedRange
ChkbxArray(4, 4) = ActiveSheet.UsedRange
ChkbxArray(5, 4) = ActiveSheet.UsedRange

Should I have used quotes for this to work properly?

Thanks

Oops should have had:

Set ChkbxArray(0, 4) = ActiveSheet.Comments
Set ChkbxArray(1, 4) = ActiveSheet.UsedRange
Set ChkbxArray(2, 4) = ActiveSheet.UsedRange
Set ChkbxArray(3, 4) = ActiveSheet.UsedRange
Set ChkbxArray(4, 4) = ActiveSheet.UsedRange
Set ChkbxArray(5, 4) = ActiveSheet.UsedRange

-----Original Message-----
I just tried the following and recieved an Error 450:

ChkbxArray(0, 4) = ActiveSheet.Comments
ChkbxArray(1, 4) = ActiveSheet.UsedRange
ChkbxArray(2, 4) = ActiveSheet.UsedRange
ChkbxArray(3, 4) = ActiveSheet.UsedRange
ChkbxArray(4, 4) = ActiveSheet.UsedRange
ChkbxArray(5, 4) = ActiveSheet.UsedRange

Should I have used quotes for this to work properly?

Thanks
.