Find and remove entire row

Hello all,

I made a example of what I would like to have. (attached)

If I fill in certain numbers in the tab "Sheet4" and press the "Remove" button, He will look for the numbers under DEU in tab DEU end if found, remove the entire row. If not found, continue with the next number. If there is no number, start with the MAC list,....

Thanks a lot!

Hey,

Good morning!

This script works perfectly. I just need 1 more adaptation please.
- The button and the items that have to be removed are in "Book1.xlsm", the lists where he has to remove the rows if found are in another file, lets say "Book2.xlsx".

Thanks a lot!

Hello,

I adapted the code to the situation over here, but not working :/
I get error 9, Subscript out of range, With Bk.Sheets(a.Value)

Please Login or Register  to view this content.

The original code is in "Greyson.xlsm" on tab Remove Dashboard
The file where I want to delete the items are on file "Ref op AO SARI.xlsx", where I select the first tab before he starts (first tab is "DEU"

Still not working.

Can you pleeeeaaaase provide me the working code?
I put it back in 1 workbook: Ref op AO Sari.xlsm

Please Login or Register  to view this content.

Try

Please Login or Register  to view this content.

Still not working when I adapt the sheet names.

I attached my final version (the normal list of numbers in the different tab are +10.000 each)

So when you press the "remove" button, he should delete the complete row in the right tab (name of column = name of tab) for the test I used the word "test")

Sombody able to fix the bugs I keep getting?

Thanks!!!!

This script will save us several hours of work each week!

Thanks!

First of all, I never wanted to say that your code had a bug. I know by adapting thinks I created the error. Really sorry for the misunderstanding.

And thanks again for the tip. Changing the range did the trick

Have a wonderful day!