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

[µo°Ý] ¸õ°Ê¬ö¿ý

[µo°Ý] ¸õ°Ê¬ö¿ý

·Q½Ð°Ý¤j¤j
¤U­±³o­Ó¬ö¿ýªíªº³Ì·s¸ê®Æ·|¤@ª½¦b³Ì¤U¤è
¤£ª¾¹D¯à¤£¯à§â³Ì·s¸ê®Æ¯d¦b³Ì¤W¤è©O
ÁÂÁ¤F
  1. Private Sub Worksheet_Calculate()
  2. Dim xR As Range
  3. If [b2] <> [b3] Then
  4.   Set xR = [c65536].End(xlUp)(2)
  5.   xR = [b2]
  6.   xR(1, 2) = Time
  7.   [b3] = [b2]
  8. End If
  9. End Sub
½Æ»s¥N½X

¥ý´¡¤JÀx¦s®æ
¦ASet xR = ·sªºÀx¦s®æ

TOP

¦^´_ 2# linyancheng
§Ú¼g¼g¬Ý ÁÂÁÂ

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