麻辣家族討論版版 » Excelㄧ般區 » 發薪日逢六日遞延

返回列表下一主題上一主題發帖

[發問] 發薪日逢六日遞延

中學生 Rank: 2

帖子: 42
主題: 11
精華: 0
積分: 104
點名: 0
作業系統: windows
軟體版本: office007
閱讀權限: 20
性別: 男
註冊時間: 2011-1-20
最後登錄: 2015-1-21

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2011-3-2 15:41 | 只看該作者

[發問] 發薪日逢六日遞延

本帖最後由 carzyindex 於 2011-3-2 17:43 編輯

公司發薪日為每月的18號

逢六日就延到星期一

請問函數該怎麼設定佔用的儲存格越少

感覺這問題滿常見的

20110318
20110218
20110118
20101220
20101118
20101018
20100920
20100818
20100719
20100618
20100518
20100419
20100318

自己的做法滿慘的

2011/3/18
2011/2/18
2011/1/18
2010/12/18
2010/11/18
2010/10/18
2010/9/18
2010/8/18
2010/7/18
2010/6/18
2010/5/18
2010/4/18
2010/3/18
先用weekday判斷星期幾如果星期六+2星期日+1
跪求簡化

樓主熱帖

收藏

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 812
主題: 7
精華: 0
積分: 862
點名: 0
作業系統: XP
軟體版本: 2007
閱讀權限: 100
性別: 男
來自: 台中
註冊時間: 2010-5-13
最後登錄: 2019-10-10

論壇貢獻勳章

2^#

發表於 2011-3-2 18:04 | 只看該作者

本帖最後由 ANGELA 於 2011-3-2 22:29 編輯

用WEEKDAY 或用MOD 都一樣要用IF 去判斷,如果不增加欄位,就要用VBA去判斷18日是否為週末再直接把18日修改為下一個星期一的日期.
否則用長公式
=IF(MOD(DATE(YEAR(TODAY()),MONTH(TODAY()),18),7)=0,DATE(YEAR(TODAY()),MONTH(TODAY()),20),IF(MOD(DATE(YEAR(TODAY()),MONTH(TODAY()),18),7)=1,DATE(YEAR(TODAY()),MONTH(TODAY()),19),DATE(YEAR(TODAY()),MONTH(TODAY()),18)))

中學生 Rank: 2

帖子: 42
主題: 11
精華: 0
積分: 104
點名: 0
作業系統: windows
軟體版本: office007
閱讀權限: 20
性別: 男
註冊時間: 2011-1-20
最後登錄: 2015-1-21

3^#

發表於 2011-3-2 23:36 | 只看該作者

回復 2# ANGELA

原來公式是這樣用的，真不是普通的短啊

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

4^#

發表於 2011-3-3 08:09 | 只看該作者

a1輸入2011/3/18
a2=EDATE(DATE(YEAR(A1),MONTH(A1),18),-1)+CHOOSE(WEEKDAY(EDATE(DATE(YEAR(A1),MONTH(A1),18),-1),2),0,0,0,0,0,2,1)
往下拉

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 812
主題: 7
精華: 0
積分: 862
點名: 0
作業系統: XP
軟體版本: 2007
閱讀權限: 100
性別: 男
來自: 台中
註冊時間: 2010-5-13
最後登錄: 2019-10-10

論壇貢獻勳章

5^#

發表於 2011-3-3 11:37 | 只看該作者

回復 4# oobird

choose這個函數幾乎被遺忘了,真管用,謝謝指導.

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 455
主題: 8
精華: 1
積分: 480
點名: 0
作業系統: WINS home
軟體版本: OFFICE XP
閱讀權限: 100
性別: 男
來自: 平鎮
註冊時間: 2010-5-1
最後登錄: 2015-1-22

論壇貢獻勳章

6^#

發表於 2011-3-3 15:06 | 只看該作者

=DATE(2011,ROW(),18)+MID("0000012",WEEKDAY(DATE(2011,ROW(),18)),1)

知之為知之，不知為不知，誠實也！

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 812
主題: 7
精華: 0
積分: 862
點名: 0
作業系統: XP
軟體版本: 2007
閱讀權限: 100
性別: 男
來自: 台中
註冊時間: 2010-5-13
最後登錄: 2019-10-10

論壇貢獻勳章

7^#

發表於 2011-3-3 23:08 | 只看該作者

本帖最後由 ANGELA 於 2011-3-4 08:24 編輯

=DATE(2011,ROW(),18)+MID("0000021",WEEKDAY(DATE(2011,ROW(),18)),1)
龔兄也是我的啟蒙老師,謝謝長久來的教導,mid函也用的妙

小學生 Rank: 1

帖子: 5
主題: 0
精華: 0
積分: 10
點名: 0
作業系統: WIN7
軟體版本: Offoce2003
閱讀權限: 10
性別: 男
註冊時間: 2011-1-3
最後登錄: 2015-3-18

8^#

發表於 2011-3-13 19:52 | 只看該作者

=DATE(2011,ROW(),18)+MID("0000021",WEEKDAY(DATE(2011,ROW(),18)),1)
MID這招太強了
不是一般人會想到的

50 字節以內
不支持自定義 Discuz! 代碼

靜思自在 : 謊言像一朵盛開的鮮花，外表美麗，生命短暫。

返回列表下一主題上一主題