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

³]©w¤u§@ªíªº¤u§@½d³ò

¥»©«³Ì«á¥Ñ stillfish00 ©ó 2013-8-16 09:20 ½s¿è

©ñ¨ì¸Ó¤u§@ªíµ{¦¡½X
  1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  2.   Application.Intersect([A:A], Target.EntireRow).Select
  3. End Sub
½Æ»s¥N½X
¦^´_ 1# ¦Û§Ú·Pı¨}¦n

¤£µM´N«OÅ@Àx¦s®æ§OÅý¥L¿ï

TOP

        ÀR«ä¦Û¦b : ¹D¼w¬O´£ª@¦Û§Úªº©ú¿O¡A¤£¸Ó¬O¨þ¥¸§O¤HªºÃ@¤l¡C
ªð¦^¦Cªí ¤W¤@¥DÃD