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

¦p¦ó¨C¤é§ó·s¤£¦P¤é´ÁªºÀɮסA¶¶«K­pºâÀx¦s®æ¼Æ??

¦^´_ 10# Hsieh


    ¤j­ô¡A«Ü·P¿E§Aªº¸Ñµª¡A§Úı±oÀ³¸Ó¤£¬OÀɦWªº°ÝÃD§a¡I²{¦b¤µ¤Ñ¬O¥i¥H§ì¨ì7/29¡A¦ý©ú¤Ñ9/1¤é¡A«o§ì¤F8/5¤éªº¸ê®Æ¦Ó¤£¬O8/1¤é

­Y¹³³oºØ±Æ°£¤»¤éºâ¤u§@¤Ñ  §Q¥Îworkday¨ç¼Æ·|¤ñ¸û¦n¶Ü?!

TOP

¦^´_ 11# zaq370

myday = Application.WorkDay(DateAdd("m", -1, Date), IIf(Weekday(DateAdd("m", -1, Date), vbMonday) > 5, -1, 0))'«e¤@­Ó¤ë
wb = Format(myday, "mmdd")
tt = Format(myday, "mm")
With Workbooks.Open(ThisWorkbook.Path & "\100" & tt & "\" & "NOC" + wb & ".xls")
¤£¹L³o¼Ëªº±¡§Î¦pªG¤j¤p¤ë¤£¦P®É¤£ª¾¹D§A­n«ç»ò§ì¸ê®Æ
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

¦^´_ 10# Hsieh


    ¬O³á!! ­Y¥Î if~~~end if ¥h§PÂ_¤»¤éªº¸Ü¡A·|¦³¤j¤p¤ëªº°ÝÃD¶Ü?!

TOP

¦^´_ 10# Hsieh


    ¤j­ô¡AÁÂÁ§AªºÀ°¦£¡A§Ú´ú¸Õ¹L¡A¨S¦³¤j¤p¤ëªº°ÝÃD¡I¡I

TOP

        ÀR«ä¦Û¦b : ¥ÌÄ@°µ¡BÅw³ß¨ü¡C
ªð¦^¦Cªí ¤W¤@¥DÃD