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

Worksheet_Change(ByVal Target As Range) °ÝÃD

¦^´_ 1# enoch


1. "·í¨Ï¥Î Worksheet_Change(ByVal Target As Range)
¦p¦ó³]©w Target = Range("A1:B10") ½d³ò¥H¤º ¥ô¦ó¤@­ÓÀx¦s®æ"

³o¼Ë¥i¥H¬Ý¨C¤@­Ó®æ¤lªº¸ê®Æ:
for each c in target
   msgbox(c.value)  
next

³o¼Ë¥i¥H¬ÝTARGET¤¤²Ä2Äæ²Ä1¦æ®æ¤lªº¸ê®Æ
msgbox(target.cells(1,2).value)

2. "¥t¥~·íWorksheet_Changeµ{¦¡¶i¦æ¤¤,
·|¦b¦P¤@¤u§@ªí¤¤¦³¸ê®Æ§Û¼g°Ê§@ Range("A1:B10") ½d³ò¥H¥~,
¥i§_¼È°±¤£·|¦A¤ÞµoWorksheet_Change¨Æ¥ó, "

¦b§Û¼g«e«á¦h¥[¥y¥N½X

    Application.EnableEvents = False
    ....§Û¼g°Ê§@...
    Application.EnableEvents = True
À´±oµo°Ý,µª®×´N·|¦b¨ä¤¤

¤µ¤éの¤@¬íは  ©ú¤éにない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

        ÀR«ä¦Û¦b : ¯u¥¿ªº·R¤ß¡A¬O·ÓÅU¦n¦Û¤vªº³oÁû¤ß¡C
ªð¦^¦Cªí ¤W¤@¥DÃD