VBA Delete Results From Advanced Filter

Hello! I am looking for help on the following-
I have uploaded a sample sheet:
1. I have Worksheet "Data 1" with a Table. There is a VBA button to run an advanced filter and search criteria. There is also a VBA button to clear the filter. These work great!
2. I also have a button to Delete the filtered result. I am uncertain how to program VBA to do this.
- I need the VBA to ONLY delete the filtered result for a specific range, not the entire row. In the example sheet provided, the range would be C-G.

3. I also need the same Delete button to also search for the first criteria on a second sheet (Worksheet "Data 2" in example uploaded) and delete the filtered result for columns B-D. I'm sure this is the same process as above, just on another sheet.

4. If possible, I also need a way to "double check" that the user is certain they want to delete the data. I'm thinking if the Delete button is hit, a window pops up and says "are you sure you want to Delete this?" Yes No"


Maybe this is too convoluted? Regardless I appreciate any insights.

Maybe something like this ? (code assign to the "Delete" button)

Please Login or Register  to view this content.

The do-loop is to have the ActiveCell stop at the next visible row in case the filtered data doesn't fall on row 11.
Once it gets the "first" row right under C10, then it define the visible range where the contents are to be cleared.