Find Duplicate

[gnusmas]

Hi Friend i have sheet with the following values my last range is a refenrence.
I need <acronym title="visual basic for applications">vba</acronym> code to find duplicate IF the neighbors values "+1" OR "-1".
Exemple:

<tbody>
[TD="class: xl63"]11[/TD]
[TD="class: xl63, width: 19"]12[/TD]
[TD="class: xl63, width: 19"]14[/TD]
[TD="class: xl63, width: 19"]22[/TD]
[TD="class: xl63, width: 19"]31[/TD]
[TD="class: xl63, width: 19"]47[/TD]

[TD="class: xl63"]06[/TD]
[TD="class: xl63"]13[/TD]
[TD="class: xl63"]28[/TD]
[TD="class: xl63"]29[/TD]
[TD="class: xl63"]42[/TD]
[TD="class: xl63"]43[/TD]

[TD="class: xl63"]21[/TD]
[TD="class: xl63"]23[/TD]
[TD="class: xl63"]27[/TD]
[TD="class: xl63"]28[/TD]
[TD="class: xl63"]33[/TD]
[TD="class: xl63"]48[/TD]

[TD="class: xl63"]01[/TD]
[TD="class: xl63"]05[/TD]
[TD="class: xl63"]11[/TD]
[TD="class: xl63"]20[/TD]
[TD="class: xl63"]22[/TD]
[TD="class: xl63"]30[/TD]

[TD="class: xl63"]16[/TD]
[TD="class: xl63"]18[/TD]
[TD="class: xl63"]24[/TD]
[TD="class: xl63"]29[/TD]
[TD="class: xl63"]36[/TD]
[TD="class: xl63"]44[/TD]

</tbody>

<tbody>
[TD="class: xl65"]16[/TD]
[TD="class: xl65, width: 19"]25[/TD]
[TD="class: xl65, width: 19"]34[/TD]
[TD="class: xl65, width: 19"]41[/TD]
[TD="class: xl65, width: 19"]45[/TD]
[TD="class: xl65, width: 19"]47[/TD]

[TD="class: xl65"]15[/TD]
[TD="class: xl65"]32[/TD]
[TD="class: xl65"]35[/TD]
[TD="class: xl65"]36[/TD]
[TD="class: xl65"]42[/TD]
[TD="class: xl65"]47[/TD]

[TD="class: xl65"]06[/TD]
[TD="class: xl65"]08[/TD]
[TD="class: xl65"]27[/TD]
[TD="class: xl65"]28[/TD]
[TD="class: xl65"]31[/TD]
[TD="class: xl65"]47[/TD]

[TD="class: xl65"]13[/TD]
[TD="class: xl65"]14[/TD]
[TD="class: xl65"]20[/TD]
[TD="class: xl65"]28[/TD]
[TD="class: xl65"]29[/TD]
[TD="class: xl65"]33[/TD]

[TD="class: xl65"]09[/TD]
[TD="class: xl65"]11[/TD]
[TD="class: xl65"]16[/TD]
[TD="class: xl65"]19[/TD]
[TD="class: xl65"]42[/TD]
[TD="class: xl65"]44[/TD]

</tbody>

Sheet 2 Result

<tbody>
[TD="class: xl65"]29[/TD]

[TD="class: xl65"]28[/TD]

[TD="class: xl65"]20[/TD]

</tbody>

<tbody>
[TD="class: xl65"]28[/TD]

[TD="class: xl65"]28[/TD]

[TD="class: xl65"]19

<tbody>
[TD="class: xl65"]28[/TD]
[TD="class: xl65, width: 19"] 33[/TD]
[TD="class: xl65, width: 19"] 48[/TD]

</tbody>

[/TD]

</tbody>

<tbody>
[TD="class: xl65"][/TD]
[TD="class: xl65, width: 19"]47[/TD]

[TD="class: xl65"]29[/TD]
[TD="class: xl65"]33[/TD]

</tbody>

Etc...

Thank you for Help!!

 

[oldbrewer]

clear as mud to me

define neighbours

are neighbours up down left right and diagonal

no takers after this time means people do not understand what you want usually....

 

[gnusmas]

Thank you friend I apreciate your help !!
Yes the neighbours are up down left right and diagonal!!
Another exemple :

[TABLE="width: 114"]
<tbody>[TR]
[TD="class: xl63, width: 19"]01[/TD]
[TD="class: xl63, width: 19"]02[/TD]
[TD="class: xl63, width: 19"]12[/TD]
[TD="class: xl63, width: 19"]30[/TD]
[TD="class: xl63, width: 19"]40[/TD]
[TD="class: xl63, width: 19"]47[/TD]
[/TR]
[TR]
[TD="class: xl63"]09[/TD]
[TD="class: xl63"]10[/TD]
[TD="class: xl63"]17[/TD]
[TD="class: xl63"]18[/TD]
[TD="class: xl63"]22[/TD]
[TD="class: xl63"]47[/TD]
[/TR]
[TR]
[TD="class: xl63"]01[/TD]
[TD="class: xl63"]21[/TD]
[TD="class: xl63"]30[/TD]
[TD="class: xl63"]36[/TD]
[TD="class: xl63"]45[/TD]
[TD="class: xl63"]48[/TD]
[/TR]
[TR]
[TD="class: xl63"]04[/TD]
[TD="class: xl63"]06[/TD]
[TD="class: xl63"]20[/TD]
[TD="class: xl63"]29[/TD]
[TD="class: xl63"]31[/TD]
[TD="class: xl63"]37[/TD]
[/TR]
[TR]
[TD="class: xl63"]13[/TD]
[TD="class: xl63"]20[/TD]
[TD="class: xl63"]24[/TD]
[TD="class: xl63"]25[/TD]
[TD="class: xl63"]29[/TD]
[TD="class: xl63"]44[/TD]
[/TR]
</tbody>[/TABLE]

[TABLE="width: 114"]
<tbody>[TR]
[TD="class: xl65, width: 19"]11[/TD]
[TD="class: xl65, width: 19"]12[/TD]
[TD="class: xl65, width: 19"]14[/TD]
[TD="class: xl65, width: 19"]22[/TD]
[TD="class: xl65, width: 19"]31[/TD]
[TD="class: xl65, width: 19"]47[/TD]
[/TR]
[TR]
[TD="class: xl65"]06[/TD]
[TD="class: xl65"]13[/TD]
[TD="class: xl65"]28[/TD]
[TD="class: xl65"]29[/TD]
[TD="class: xl65"]42[/TD]
[TD="class: xl65"]43[/TD]
[/TR]
[TR]
[TD="class: xl65"]21[/TD]
[TD="class: xl65"]23[/TD]
[TD="class: xl65"]27[/TD]
[TD="class: xl65"]28[/TD]
[TD="class: xl65"]33[/TD]
[TD="class: xl65"]48[/TD]
[/TR]
[TR]
[TD="class: xl65"]01[/TD]
[TD="class: xl65"]05[/TD]
[TD="class: xl65"]11[/TD]
[TD="class: xl65"]20[/TD]
[TD="class: xl65"]22[/TD]
[TD="class: xl65"]30[/TD]
[/TR]
[TR]
[TD="class: xl65"]16[/TD]
[TD="class: xl65"]18[/TD]
[TD="class: xl65"]24[/TD]
[TD="class: xl65"]29[/TD]
[TD="class: xl65"]36[/TD]
[TD="class: xl65"]44[/TD]
[/TR]
</tbody>[/TABLE]

30 36 45 in range A1:F5

29 36 44 in range A7:F11

Ray = Array(Array(0, 1), Array(1, 1), Array(1, 0), Array(1, -1), Array(0, -1), Array(-1, -1), Array(-1, 0), Array(-1, 1))

I hope you understand my exemple!

 

[oldbrewer]

why is 36 listed as its neighbours are 17 18 22 30 45 20 39 41

 

[gnusmas]

30 36 45 in range A1:F5

30 36 45 in range A7:F11

"36" in the second exemple and it is duplicate when you look the values left and right the neighbors +1,-1
30 36 45
29 36 44
I hope it help you!!

 

[oldbrewer]

36 IN A1:F5 does not have 37 or 35 as a neighbour