Make column cell input mandatory if initial cell has input

Hi There,

I found that page on the forum and it has helped me to make cells input mandatory if initial cell has input.

below what I found:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = False
Application.EnableEvents = True

If Trim(Range("E8")) <> "" Then
If Trim(Range("F8")) = "" Then Cancel = True
If Trim(Range("G8")) = "" Then Cancel = True
If Trim(Range("H8")) = "" Then Cancel = True
End If

If Range("H8") = "No" Then
If Trim(Range("D18")) = "" Then Cancel = True
If Trim(Range("E18")) = "" Then Cancel = True
If Trim(Range("F18")) = "" Then Cancel = True
End If

If Trim(Range("E9")) <> "" Then
If Trim(Range("F9")) = "" Then Cancel = True
If Trim(Range("G9")) = "" Then Cancel = True
If Trim(Range("H9")) = "" Then Cancel = True
End If

If Range("H9") = "No" Then
If Trim(Range("D18")) = "" Then Cancel = True
If Trim(Range("E18")) = "" Then Cancel = True
If Trim(Range("F18")) = "" Then Cancel = True
End If

If Cancel = True Then MsgBox "Please fill in all the cells required."

End Sub

However, it's working for only a cell and I'm looking to select a whole column. I've tried many different ways but I cannot find something that works.
Would help me with that?

Thanks,

Hi,

Thank you for your answer. I'll test that ASAP.

Regarding your note and the second point. I needed the whole column when someone starts to add something in that specific column.
Indeed, I send my excel to someone who has to fill it. When they start to fill the column A for example, I need mandatory info in the column B. However, I will not know in advance how many rows they will need in the column A. Can the BVA works only if there is something in the column A? I hope my example is clear. :-)

Thank in advance

I think i found how to do :-)

Thanks again for your help!