What if there is no data for the macro to run off of?

[melrose0507]

Each day, a user will cut and paste data into two different sheets of a workbook. I have a macro set up that will splice all the data the way we need it and then move the data from one to the other so I have all the data in one sheet. I used Private Subs to get all the information set up.

Sub Verifications()
Call RemoveNR
Call Zone
Call DataMove
Call Format


End Sub

The first 3 calls are for Sheet 2. Sometimes there is not any data to go in this sheet(each day new data is put into both sheets). It causes the macro to fail in the first Private Sub. How can I have it to look to see if data exist before the rest of the macro finish? Basically saying something like "if data exists continue, if not end sub". Here is what the first private sub looks like.

rivate Sub RemoveNR()

Sheets("I+ Report").Select

Dim i As Integer

For i = Range("AA1").End(xlDown).Row To 2 Step -1
If InStr(Cells(i, 27), "NR ") = 0 Then
Rows(i).Delete Shift:=xlUp
End If
Next i

End Sub

Thanks for your help. I will have close to 50 users that will use this macro and most are not excel savvy in the slightest.

[stnkynts]

Maybe

Please Login or Register  to view this content.

[melrose0507]

Thanks for responding so fast.

That worked for not running the macro. I do need to run the "Call Format" reguardless if there is not any data in the I+ Report sheet. How can I make sure that one runs but not the others?

[stnkynts]

Surprised you could figure this one out on your own.

Please Login or Register  to view this content.