If Cell A1 has contains value cell B1 should not be blank

[bhinderwala]

Hi

I need a help to write a VBA code for my following query.

If Cell A1 has contains value cell B1 should not be blank and user must need to enter the value before triggering other macros.

Thanks

 

[Scott Huish]

Will this code in the Worksheet SelectionChange event work for you?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then Exit Sub
If Range("A1") <> "" Then
    If Range("B1") = "" Then
        Application.EnableEvents = False
        Range("B1").Select
        Application.EnableEvents = True
    End If
End If
End Sub