¥»©«³Ì«á¥Ñ tsunamix03 ©ó 2015-3-21 12:38 ½s¿è
§Ú¤u§@ªí1¤W
°õ¦æ³oÓµ{¦¡
³oÓµ{¦¡ªº¬O®Ú¾ÚKÄ檺¤é´Á
§PÂ_¸Ó¤é´Á¬OÄÝ©ó¬P´Á´X¡A
¨Ã±Nµ²ªG¦Ü©óLÄæ
¦ý°j°é«o¦ü¥u¦³°õ¦æ¤@¦¸
¤]´N¬OL10Àx¦s®æȬO5
¥ýÁÂÁ¸Ѵbªº°ª¤â
For i = 10 To 16
Cells(i, "L") = Weekday(Cells(i, "K"), vbMonday)
Next |