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

¦p¦óIJµo¥¨¶°

If application. Intetsect([h:h], target)  then ...

TOP

¦b3/F ¥Î¤â¾÷¥´¿ù¦r., §ó¥¿¬°¦p¤U:
  1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  2. If Application.Intersect([h:h], Target) Then Call ±Æ¦Wtest02
  3. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¤H­nª¾ºÖ¡B±¤ºÖ¡B¦A³yºÖ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD