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

[µo°Ý] ¤u§@ªí²¾°Ê©Î¬O½Æ»s®É,·sªº¤u§@ªíH7Àx¦s®æ¦Û°Ê¶ñ¼g¤é´Á¸ò®É¶¡

¦^´_ 1# niko88819

§Aªº°ÝÃD¤£¬O«Ü²M·¡¡A¬G¥u¦n·Ó§Ú·Qªk¥h´¢¼¯¡I
  1. Sub ¥¨¶°1()
  2.     Sheets("20140319").Copy After:=Sheets(1)
  3.     Sheets("20140319 (2)").Name = Format(Date & Time, "yyyymmddhhmmss")
  4.     Range("H7") = Format(Date & Time, "yyyymmdd hh:mm")
  5. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¬O«D·í±Ð¨|¡AÆg¬ü§@ĵ±§¡C
ªð¦^¦Cªí ¤W¤@¥DÃD