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

¦X«÷Àx¦s®æÅã¥Ü·í¤Ñ¤é´Á

¦X¨ÖÀx¦s®æ¥u¦³²Ä¤@®æ·|¨ü­È¡A©Ò¥H§PÂ_²Ä¤@­È´N¥i

Private Sub Worksheet_SelectionChange(ByVal T As Range)
    If T.Address = "$A$1:$C$1" And T(1) = "" Then T = Date Else T = ""
End Sub
{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

¦^´_ 6# rc_chc

{...} ªí¥Ü»Ý­n¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡

TOP

        ÀR«ä¦Û¦b : ¤Ó¶§¥ú¤j¡B¤÷¥À®¦¤j¡B§g¤l¶q¤j¡A¤p¤H®ð¤j¡C
ªð¦^¦Cªí ¤W¤@¥DÃD