I'm not sure this is what you have in mind but it is worse to checkout:
* Suppose you have some header in cell A1.
* Select the range A3:A50 > click Data > Data Validation > choose "Custom" >
in the "Formula" box type:
=COUNTA($A$2:$A2)=ROW()-2
* Watch the Absolute/Relative Addresses *
Micky
OR:
* Select the Range A2:A50.
* Data > Data Validation > choose "Custom" > in the "Formula" box type:
=NOT(ISBLANK(A1))
* UnCheck the "IGNORE BLANK" Checkbox.
Micky
OR - you may try the Event-Macro:
--------------------------------------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Set intsect = Application.Intersect(Target, Range("A2:A" &
ActiveSheet.Rows.Count))
If Not (intsect Is Nothing) Then
If Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0 Then
MsgBox "You are trying to skip some cell(s) in column A"
Target.ClearContents
End If
End If
End Sub
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.