Delete Rows in Multiple Sheets Problem

Hi guys, I have a Working codes here that can Delete an Entire Row in Multiple Selected Sheets, My Problem is I got too many Confirmation MsgBox because it loops through different worksheets.

I want to have a total number of rows to be deleted in only 1 Confirm MsgBox.

See my Sample Image below:
1.PNG

2.PNG

3.PNG

Here is my Codes Below:

Please Login or Register  to view this content.

Add :
Application.DisplayAlerts = False
like that

Please Login or Register  to view this content.

Originally Posted by lotuxel

Add :
Application.DisplayAlerts = False
like that

Please Login or Register  to view this content.

Hi lotuxel,

Nothing happens but thanks for the reply.

Originally Posted by JapanDave

Untested,

Please Login or Register  to view this content.

Hi JapanDave

The codes is not working.

it only shows the last confirmation message.

and when you did not select multiple sheets, it doesnt show confirmation message.

btw. Thanks for the response.

Originally Posted by JapanDave

That was a typo with it not working on 1 selected sheet. Try the below code.

As for you other statement. If it is all or nothing then the below code is you best bet.

Please Login or Register  to view this content.

Using the codes you provide I got a Run-Time error '91'
Object variable or with block variable not set

on line

Please Login or Register  to view this content.

Originally Posted by JapanDave

Please Login or Register  to view this content.

Hi JapanDave

The confirmation message doesnt have the total number of rows to be deleted. it just say: "Would you like to delete found Rows on selected sheets?"

I need a confirmation message that have/compute the total number of rows to be deleted.