Hi Yan

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 3 Then
'whatever
Cells(1, 1).Select
End If
End Sub

HTH. Best wishes Harald

"Yan Robidoux " skrev i
melding ...
hello to you all...

well i have an application that place and sort data in a worksheet. it
work perfectly except for one small thing. the user got to clik in a
cell to call the sub (i used worksheet_selectionchange). proble is :

if the user want to enter another value he got to clik elsewere then
clik back into the appropriate cell to bring selectionchange in action
again. thus i would like to set the focus elsewhere, let say a1, at the
end of my application so the user would only need clik into the
appropriate cell.

so how do i set focus elsewhere ? thanks...

yan


---
Message posted from http://www.ExcelForum.com/