One way. Modify to suit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
If Target.Offset(, -1) = "" Then
Target.Offset(, -1).Select
MsgBox "Pleae fill in"
Else
Target.Offset(, 1).Select
End If
End If
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Steve" wrote in message
...
Hi

I'm not sure if this possible, but is there a way to format some cells
so that they have to have information put in them. I know it's
possible in Access, but when tabbing along a row I want to be able
have the cursor not move out of the cell until information has been
input

TIA
Steve