Runtime error 451 on dictionary testing

[yxz152830]

Gurus,
i was trying out dictionary to solve a problem and this error occurs. I checked out the microsoft doc but still confused. What is the problem with the debug.print here? both give me "

Runtime Code 451 Property let procedure not defined and property get procedure did not return an object"​

Checking local windows I can see dictionary starts taking in values.

Sub asjdiajdij()
Dim d As Object
Set d = CreateObject("scripting.dictionary")
For Each cell In Sheets("abc").ListObjects("abc").DataBodyRange.Columns(1).Cells
d(cell.Value & cell.Offset(0, 1).Value) = ""
Debug.Print d.items(1)
Debug.Print d.keys(1)
Next cell
End Sub

 

[Fluff]

As you are using late binding you need to use

Debug.Print d.Items()(0)
Debug.Print d.Keys()(0)

although that will only give you the 1st key. To get all the keys

Debug.Print d.Keys()(d.count - 1)

 

[yxz152830]

As you are using late binding you need to use

Debug.Print d.Items()(0)
Debug.Print d.Keys()(0)

although that will only give you the 1st key. To get all the keys

Debug.Print d.Keys()(d.count - 1)

hi what is late binding and if I want to do early binding how do i rewrite the code? thanks!

 

[Fluff]

Have a look for early vs late binding. VBA - Early Binding and Late Binding | DEVelopers HUT

 

[yxz152830]

Have a look for early vs late binding. VBA - Early Binding and Late Binding | DEVelopers HUT

one more question tho. my concern was that the late binding would cause ubiquitous code format changes like dictionary.keys(1) to dictionary.keys() (1). the article hasnt mentioned this. What is the reason for the extra parenthesis?

 

[Fluff]

I've no idea why it's needed, it just is.