Cancel Save

[Moseth]

I Currently have this :

If Application.Sheets("dhdn").Range("D11").Value = "Yes" And _
Application.Sheets("fgdfd").Range("I11").Value = "" Then
Cancel = True


so this currently means if cell D11 is marked a yes but I11 is left as blank then the save opeartion will not allow.

What I want is the following:
If Cell D11 is marked as yes and I11 is left blank, Cell B41 cant be left blank otherwise save will fail.

How do I incorporate this in the code?

 

[FracinDean]

You didn't mention which sheet to check cell B41 so I guessed.

You can just use the "And" operator again.

IF Application.Sheets("dhdn").Range("D11").Value = "Yes" And _
Application.Sheets("fgdfd").Range("I11").Value = "" And _
Application.Sheets("fgdfd").Range("B41").Value = "" Then
Cancel =True
End If