[VBA] Error Message

[ExcelNooberino]

So I've been working on a macro for my personal use really and I added some errors with MsgBoxes to prevent myself from making a silly mistake. The thing is I have two different erros in a row (consecutive errors) and I want to show just one of the MsgBoxes. Instead of that I'm getting one MsgBox from the first error and when I close that box the second one appears as well. The thing is I want to show just the first one if the first error is to occur. So far I got this:

Dim ws As Worksheet

On Error Resume Next
Set ws = Sheets("Sheet1")
If Err.Number <> 0 Then
MsgBox "Please import data first", vbInformation, "Importing Error"
Else
'do nothing
End If


If Range("Weekly!G19") = "" Then
MsgBox "Please fill the Obsolete Inventory box!", vbInformation, "Generating Error"
End
Else
'do nothing
End If

Any suggestions?!

 

[steve the fish]

Add a new line:

Exit Sub

after each message box.

 

[ExcelNooberino]

Thanks mate!

 

[ExcelNooberino]

Hi again! So, I realized that exiting the sub would fix the problem with the two MsgBoxes showing up, but now the second error I should get doing something is not occurring.. In simple words, even if Range("Weekly!G19") = "" this secong MsgBox doesn't show up :/

 

[ExcelNooberino]

Nevermind, I was posting the Exit Sub after the End If and not after the MsgBox.. It works now, thank you