select Data from list 4n

select the working num

as show here

a1.PNGtoselect_indta_to.xlsx
ADRIANA PACCOUNTING ASSISTANTAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Martin LissOlder than dirtCommented:
The output is 4n but the input is 3n, correct?
ADRIANA PACCOUNTING ASSISTANTAuthor Commented:
The output is 4n but the input is 3n, correct?

YES!
Martin LissOlder than dirtCommented:
Try this. If you don’t understand the english word ‘adjacent’, it means ‘adyacente’ or 'cerca'.
29117898.xlsm
Ensure Business Longevity with As-A-Service

Using the as-a-service approach for your business model allows you to grow your revenue stream with new practice areas, without forcing you to part ways with existing clients just because they don’t fit the mold of your new service offerings.

ADRIANA PACCOUNTING ASSISTANTAuthor Commented:
why theses adjacents  still out ??
a22.PNG
Martin LissOlder than dirtCommented:
I didn't consider the 3n numbers where the matching numbers were not together. I'll fix that. But why '6683'???
ADRIANA PACCOUNTING ASSISTANTAuthor Commented:
a22.PNG
ADRIANA PACCOUNTING ASSISTANTAuthor Commented:
i will sugest some levels of adjacents

 you may be rigth they are not adjacent
  but for my they are  very important to be  considered
ADRIANA PACCOUNTING ASSISTANTAuthor Commented:
a22.PNG
ADRIANA PACCOUNTING ASSISTANTAuthor Commented:
63 is the  repeat pair
Martin LissOlder than dirtCommented:
I see that but they are not adjacent so I'd need to completely redo my code (in a new question) to handle them. The attached is an improvement however.
29117898a.xlsm

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
ADRIANA PACCOUNTING ASSISTANTAuthor Commented:
Great Job

Best Expert !
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
VBA

From novice to tech pro — start learning today.