有關行事曆，如何計算當月出勤及假日天數？

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

11^# 跳轉到 »

發表於 2015-7-21 22:56 | 只看該作者

本帖最後由 ML089 於 2015-7-21 22:58 編輯

回復 10# phoebegin

A3 =DATE(B1,1,1)
A9 =EDATE(A3,1)
B3:H8 {=IF(MONTH(A3)=MONTH(A3-WEEKDAY(A3)+{1,2,3,4,5,6,7}+{0;1;2;3;4;5}*7),A3-WEEKDAY(A3)+{1,2,3,4,5,6,7}+{0;1;2;3;4;5}*7,"")}
I4 =NETWORKDAYS(A3,EOMONTH(A3,0),OFFSET(K$2,,,COUNT(K:K)))
I7 =DAY(EOMONTH(A3,0))-I4
{…} 表示為陣列公式，輸入公式需使用三鍵輸入(CTRL+SHIFT+ENTER三鍵齊按輸入)

EDATE函數
工具\加載宏(繁體版稱增益集)\打勾以下三個選項
1. internet VBA輔助程式
2.VBA分析工具箱
3.分析工具箱

行事曆ML089.rar (13.54 KB)

補充
格式化條件 B3
=(B3>0)*(0=NETWORKDAYS(B3,B3,OFFSET($K$2,,,COUNT($K:$K))))

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

phoebegin

中學生 Rank: 2

帖子: 45
主題: 4
精華: 0
積分: 66
點名: 0
作業系統: XP
軟體版本: office 2003
閱讀權限: 20
性別: 女
來自: 高雄
註冊時間: 2013-11-8
最後登錄: 2023-6-14

12^#

發表於 2015-7-22 12:28 | 只看該作者

回復 11# ML089

　　謝謝您~您太貼心了，從昨天一直在思考如何修改，您這場及時雨又出現了，
　　　　　　不但秀檔案，知道我目前權限不足還幫我把公式秀出，問題幾乎都解決了～
　　　　　　現在有狀況的剩最下方設定格式的問題，等權限足夠(快足囉)，再把您的檔案下載來好好研究~
另外想請教您陣列公式
{=IF(MONTH(A5)=MONTH(A5-WEEKDAY(A5)+{1,2,3,4,5,6,7}+{0;1;2;3;4;5}*7),A5-WEEKDAY(A5)+{1,2,3,4,5,6,7}+{0;1;2;3;4;5}*7,"")}
　　　　　　裡頭{1,2,3,4,5,6,7}代表欄，{0;1;2;3;4;5}代表列嗎？

TOP

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

13^#

發表於 2015-7-22 12:47 | 只看該作者

回復 12# phoebegin

裡頭{1,2,3,4,5,6,7}代表欄，{0;1;2;3;4;5}代表列嗎？

YES

{1,2,3,4,5,6,7}代表水平陣列
{0;1;2;3;4;5}代表垂直陣列

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

phoebegin

中學生 Rank: 2

帖子: 45
主題: 4
精華: 0
積分: 66
點名: 0
作業系統: XP
軟體版本: office 2003
閱讀權限: 20
性別: 女
來自: 高雄
註冊時間: 2013-11-8
最後登錄: 2023-6-14

14^#

發表於 2015-7-28 10:30 | 只看該作者

回復 13# ML089

老師~我真的發現自己很鈍，再教教我好嗎？

　另外設定格式條件要全部反白設定，還是一個一個設定呢？（我記得之前的檔是直接全部反白設定）

再另外～如果其中一天六或日必須補班（上班），那麼要再如何設定呢？

TOP

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

15^#

發表於 2015-7-28 10:53 | 只看該作者

回復 14# phoebegin

設定格式條件要全部反白設定，還是一個一個設定呢？（我記得之前的檔是直接全部反白設定）

全部反白設定

我目前使用2007版，有時全部反白設定有會有問題，我都是先清除選擇範圍內的原先設定再重設
我覺得2003我比較習慣。

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

16^#

發表於 2015-7-28 10:56 | 只看該作者

回復 14# phoebegin

如果其中一天六或日必須補班（上班），那麼要再如何設定呢？

這有些麻煩，使用EXCEL的內定公式可能作不到，需要自行定義補班日期再加回來。
條件設定也是需要再參考補班日期。

幾年前有作過類似，晚上回家再找看看。

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

17^#

發表於 2015-7-29 22:51 | 只看該作者

回復 14# phoebegin

加一欄補班日期

行事曆ML089.rar (13.75 KB)

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

phoebegin

中學生 Rank: 2

帖子: 45
主題: 4
精華: 0
積分: 66
點名: 0
作業系統: XP
軟體版本: office 2003
閱讀權限: 20
性別: 女
來自: 高雄
註冊時間: 2013-11-8
最後登錄: 2023-6-14

18^#

發表於 2015-7-31 11:40 | 只看該作者

回復 15# ML089

老師：
　　　　我全部反白連其他格式都變成，="(B3>0)*(0=NETWORKDAYS(B3,B3,OFFSET($X$3,,,COUNT($X:$X))))"[attach]21584[/attach]

　　　　而且在其他假日儲存格修改，雖然已改成功，但還是不會填滿顏色