how to allow row edit only if 1st column is not empty

[davidmyers]

Hi, I have a sheet for users to fill, first column A must be filled, after that they can fill any other columns in the row.
How do I ensure column A is not empty?

Thanks for any help
David

 

[Joe4]

We can do that with some automated VBA.
Go to the sheet you want to apply this on, right-click on the sheet tab name at the bottom of the sheet, select "View Code", and paste this code in the resulting VB Editor window:

Private Sub Worksheet_Change(ByVal Target As Range)

    Dim cell As Range
    Dim updt As Boolean
    
    updt = False
    
    For Each cell In Target
        If cell.Column > 1 And Cells(cell.Row, 1) = "" Then
            Application.EnableEvents = False
            cell.ClearContents
            updt = True
            Application.EnableEvents = True
        End If
    Next cell
    
    If updt Then MsgBox "You cannot update these cells, column A must be updated in the row first"
    
End Sub

That is all you need to do. It will handle the rest automatically.

 

[davidmyers]

Thanks Joe, Works a treat!

 

[Joe4]

You are welcome!