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

¨Ï¥Î TODAY() ¨ú±o¨t²Î¤é´Á µM«á©T©w¤£ÅÜ «ç¼Ò°µ©O

A1:99¦~10¤ë13¤é
¤½¦¡:=FIXED(YEAR(NOW())-1911,0,TRUE)&"¦~"&FIXED(MONTH(NOW()),0,TRUE)&"¤ë"&FIXED(DAY(NOW()),0,TRUE)&"¤é"

vba
Sub Macro1()
    Range("B1") = Range("A1")  
End Sub

A1:99¦~10¤ë13¤é(¬°¤½¦¡)
B1:99¦~10¤ë13¤é (¬°¤å¦r)§Y¬°·í®É§@·~¤é´Á
----------------------------------------------------------------------
²³æ»¡©ú¦p¤W...(´ú¸Õ«á没°ÝÃD)
50 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

        ÀR«ä¦Û¦b : ¡i°±º¢¤£«e¡A²×µL©Ò±o¡j¤H³£°g©ó´M§ä©_ÂÝ¡A¦]¦Ó°±º¢¤£«e¡FÁa¨Ï®É¶¡¦A¦h¡B¸ô¦Aªø¡A¤]¤FµL¥Î³B¡A²×µL©Ò±o¡C
ªð¦^¦Cªí ¤W¤@¥DÃD