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

Àx¦s®æRUN¥¨¶°°ÝÃD

³o¨Ç¥u¬O¤ñ¸û°ò¦ªº»yªk¡A¼ô½m«á´N¯àÆF¬¡¹B¥Î¡C
²`¤JÂIªº®Ñ¤]«Ü¦h¡A¦ý§Ú¤]¬Ý¤£À´¡I¤£«ØÄ³§A«æµÛ¶R¡C

TOP

¥»©«³Ì«á¥Ñ oobird ©ó 2010-10-16 20:32 ½s¿è
  1. Private Sub Worksheet_Change(ByVal Target As Range)
  2.     If Target.address = [U5].address Then
  3.         Select Case Target
  4.         Case 1: MYIC1
  5.         Case 2: MYIC2
  6.         Case 3: MYIC3
  7.         Case 4: MYIC4
  8.         End Select
  9.     End If
  10. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¡i»X½ªªº¦Û¥Ñ¡j¤H±`¦b¤°»ò³£¥i¥H¦Û¥Ñ¦Û¦bªº®É­Ô¡A«o³Q³oºØÀH¤ß©Ò±ýªº¦Û¥Ñ»X½ª¡AµêÂY®É¥ú¦Ó²@µLıª¾¡C
ªð¦^¦Cªí ¤W¤@¥DÃD