vba help - dictionary syntax

[Mallesh23]

Hi Team,

I am trying to understand one dictionary Line. Below is the line,
How to Read it. It is used to highlight duplicate values.


d(Cells(i, 1).Value) = d(Cells(i, 1).Value) + 1 ...... what this line does.?....

Set d = CreateObject("Scripting.Dictionary")
  For i = 2 To 7
    d(Cells(i, 1).Value) = d(Cells(i, 1).Value) + 1 'Add comment.
  Next i


For Each itm In d.Keys
    If d(itm) = 1 Then d.Remove itm
  Next itm

Thanks
mg

 

[RoryA]

It adds 1 to whatever value is currently stored for the Cells(i, 1).Value key, so you get an item count for each cell in the range.

 

[Mallesh23]

Hi Rory,

Does below lines add 1 and also key in its place.

d(Cells(i, 1).Value) = d(Cells(i, 1).Value) + 1 'Add comment.


Thanks
mg

 

[RoryA]

When you execute this part:

d(Cells(i, 1).Value) =

the key will be created if it doesn't already exist, if that's what you mean?

 

[Mallesh23]

Hi Rory,

Right ! key gets Created , Understood and thanks for your help on it. ?


Thanks
mg