Thread: Return Focus
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Samuel Looney Samuel Looney is offline
external usenet poster
 
Posts: 6
Default Return Focus

I am checking cells for null values. I have the before close event. If a cell
is found to be null then it cancels the close event. After the user clicks OK
I would like it to return focus back to the Cells(rownumber, 8). Meaning
return focus by the cell appearing with the bold outline with the cusor
blinking in the cell.

If Cells(rowNumber, 8) = "" And Cells(rowNumber, 9) = "" And
Cells(rowNumber, 10) = "" Then
emptyRow = True
cancel = True
MsgBox "Status for Sheet " & s & " at Row " &
rowNumber & " Must Be Either Owning, Checking, or Loaned"
Exit Do
Sheets(s).Activate
noValue = rowNumber
End If