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

[µo°Ý] ½Ð¯q¡AExcel ¶}±Ò¯S©w¦~¤ë¥÷¸ê®Æ§¨¡C

  1. Sub Test()

  2. CC = Format(Date, "yyyy.mm")
  3. VBA.Shell "explorer.exe D:\AA\BB\" & CC, 1

  4. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¤â¤ß¦V¤U¬O§U¤H¡A¤â¤ß¦V¤W¬O¨D¤H¡F§U¤H§Ö¼Ö¡A¨D¤Hµh­W¡C
ªð¦^¦Cªí ¤W¤@¥DÃD