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

[µo°Ý] Worksheet_Change ddeÅܰʪº­È§ì¤£¨ì ??

[µo°Ý] Worksheet_Change ddeÅܰʪº­È§ì¤£¨ì ??

Worksheet_Change ddeÅܰʪº­È§ì¤£¨ì ??
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("F1").Address Then


Range("g65536").End(xlUp).Offset(1, 0) = Time
Range("g65536").End(xlUp).Offset(0, 1) = Target.Value
End If
End Sub
§Ú¦bF1§ó§ï¼Æ¦r³£§ìªº¨ì?§ï¬°§ìDDEªº¸ê®Æ §ì¤£¨ì(µLªkIJ°Ê) ??
¦pªG¥ÎWorksheet_Calculate¤]§ìªº¨ì

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