ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

¦p¦ó³]©w1Ä檺³¡¥÷Àx¦s®æ¤£¯à­×§ï

¦^´_ 1# agwhk

¥i¥H¥Î¤U¦Cªº¥N½X¤è¦¡¥h°µ¡A´N¬O¤£­nÅý¨ä¥L¤HÂI¿ï³o¨ÇÀx¦s®æ¡A¥u­nÂI¿ï³o¨ÇÀx¦s®æ´N¸õ¶}¨ìA1Àx¦s®æ
  1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  2. If Target.Row >= 20 And Target.Row <= 65536 And Target.Address = Cells(Target.Row, "F").Address Then
  3.     Range("A1").Select
  4. End If
  5. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ÀR§¤±`®¦¤v¹L¡B¶¢½Í²ö½×¤H«D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD