工作

Excel-用「自訂函數」計算各種日期單位之間的差異值？ - 工作

Daph Bay avatarDaph Bay · 2007-10-23

Table of Contents

請教各位先進，在Excel中的雖有提供DATEDIF,EOMONTH等函數，然DATEDIF函數卻存在著一小部份的BUG。詳見http://tw.knowledge.yahoo.com/question/question.ph...中筆者與WhiteFox之回覆與評論另外亦可參考Microsoft官方網站http://office.microsoft.com/zh-tw/help/HA011609811...再參閱GONG之回覆http://qa.pcuser.com.tw/modulesewbb/viewtopic.ph...而計算兩日期之間的各種單位，卻是Excel使用者經常需要使用。雖ExcelVBA中已有提供DATEDIFF函數，但是大多數Excel使用者對VBA涉獵不深，因而無法運用之。有鑑於��
工作

All Comments

Oscar avatarOscar2007-10-25
自訂函數是要用在Excel儲存格內或者是VBA程式設計內呢？2007-10-2418:12:07補充：我的Function是已經寫好了，但是無法像=Sum函數一樣使用在儲存格內，請指教使用方式。2007-10-2419:11:04補充：FunctionmyDateDif(ByValstart_dateAsDate,ByValend_dateAsDate)AsString'主函數　y1=Year(start_date)　y2=Year(end_date)　m1=Month(start_date)　m2=Month(end_date)　d1=Day(start_date)　d2=Day(end_date)　Ifd1=lastday(y1,m1)Andd2=lastday(y2,m2)Then'兩日期均為該年月之最後一天　　d1=0　　d2=0　　myDateDif=IIf(y2-y1-IIf(m2>=m1,
Iris avatarIris2007-10-27
我本來從沒遇到過修NAS修硬碟和隨身碟要資料救援，一開始也跟大家一樣總是問價格到處比價，因為不懂，凡事都從價格,考量，輕言聽信朋友介紹比較便宜一家，找錯家之後痛苦尾隨而來，以下省略500字........,後來自己上網找資料救援找到硬碟醫院，和他們經理溝通之後給我正確觀念，這是妳寶貴的資料，妳要考慮是救不救的回問題，而不是貴不貴問題,如果重要請找對人搶救NAS資料硬碟救援才能恢復你的NAS中多顆的硬碟資料http://www.datamaster.com.tw/...
Connor avatarConnor2007-10-23
我的myDateDif()也寫得差不多了,VBA的DateDiff也有問題,DateDiff("YYYY","1975/3/1","2001/2/28")得到26,真討厭,只好另外寫函數來解決,但仍有其他問題待解決......ToLiu-Liu:在VBE裡插入模組,把Function定義放在模組裡,在工作表裡面就可以用它了2007-10-2418:54:53補充：worlonzeng的程式和我的有個相似的問題,臥龍生大俠的是:2007/2/28to2008/2/28==>1,0,0(年月日)2007/2/28to2008/2/29==>1,0,12007/2/28to2008/3/1==>1,0,1我的是這樣:2007/2/28to2008/2/28==>1,0,0(年月日)2007/2/28to2008/2/29==&a
Rae avatarRae2007-10-24
拜讀各位大師、先進的意見與之前著作，小弟做了一個小小測試檔案，也許可提供各位先進、大師作為函數開發的參考~~^^小弟也用DATEDIF()加入運算，其中各種日期區間各個算法會衍生不同結果，至於對與錯，就見仁見智囉~~^^測試檔http://www.funp.net/82156372007-10-2415:48:18補充：小弟看法DATEDIF函數在月底有點BUG應該是確定的，不然天數不會有負數產生，但是人話的溝通方式卻是問題之關鍵所在如T兄上例如果前算後不算，或前不算後算，答案小弟認為應該是25
Yedda avatarYedda2007-10-27
經worlonzeng大大指點，我原先的公式有點問題。思考邏輯應該是對的，錯是錯在我在一般情形下直接借用datedif()的結果，但是datedif()有問題的情況比我預期的還多。所以，要直接套用我的錯誤公式前，請再多想一下:)2007-10-2419:29:56補充：寫了個程式，意見欄放不下，改放在我的格落格的回應中，麻煩大家看一下http://tw.myblog.yahoo.com/whitefox-blog/article?m...測試結果如下2007/1/30~2007/3/1　為0年1月2日2007/2/28~2008/2/28　為1年0月0日2007/2/28~2008/2/29　為1年0月0日2007-10-241
Megan avatarMegan2007-10-25
原本想照WhiteFox大大的公式直接轉成VBA，可是發現Excel增益集的函數在VBA中不能用，所以要花點時間自己寫了還是大家把原則說清楚，全部重寫算了
Lucy avatarLucy2007-10-26
非常謝謝w兄回應。關於這部份，可參考WhiteFox部落格中的標準。http://tw.myblog.yahoo.com/whitefox-blog/article?m...2007-10-2316:19:07補充：不知w兄是否還有其他建議？如增加第四個引數來控制？2007-10-2316:20:04補充：Access也有提供DATEDIFF函數，請見：http://office.microsoft.com/zh-tw/access/HA0122881...2007-10-2321:53:52補充：W兄：基本上個人以為，只要能與ExcelVBA中的DateDiff加上Access中的DateDiff函數吻合，在下以為如此就是客觀的了。再度感謝您，勞心了～2007-10-2414:34:53補充：W兄，請