for each and value in dictionary and transper to array

i have data i columns(1) i want resume count unique and take unique this is my code
first code "code_one" run is well but not run if tranpser to array
second code "code two" not run
what is problem with my coding

Please Login or Register  to view this content.

this code is run but not run if transper to array

second coding is not run

Please Login or Register  to view this content.

or maybe so

Please Login or Register  to view this content.

Thank nilem
How update this code
If in col a ,i want take unique and i col c,d,e take value acording row unique in col a
Example
Col
a. b. c. d. e.
jhon 1. 2. 3. 4
jhon. aa. Bb. Cc. Dd
alex. zz. ss. Jj. Cf
I want copy to new sheet only unique in col a
jhon. aa. Bb. Cc. Dd
alex. zz. ss. Jj. Cf

something like this (it would be better to see an example of your file)

Please Login or Register  to view this content.

Thankyou nilem great job
I want ask
What different
.item(x(i,1))= rw
With
rw=.item(x(i,1))
This is same as or different thank nilem

Thank kabellah

rw=.item(x(i,1)) - The element .item(x(i,1)) transfers its value to the variable rw
.item(x(i,1))= rw - the variable rw passes its value to the element .item(x(i,1))

Thank you very match nilem
Next time i want ask you again

Hi daboho,
I tried to comment the lines of code

Please Login or Register  to view this content.

see also here

Ok thankyou brother nilem
I has read and learn blog cnb
I has learn all your file "ertert"
But in this moment still confiuse
Union array and dictionary
But i has thank very match to your explain
Thank you nilem,i hope you not boring explain me abaut array
Regard daboho