傳回指定工作表值及年資問題

周大偉

請大大們協助, 附檔中有說明, 謝謝!!

bb.rar (286.54 KB)

下載次數: 14

2011-4-1 20:13

Hsieh

回復 2# hugh0620


VBA計算年資有自己的函數
DateDiff("yyyy", Target, Date)
不過樓主似乎是要得到年月的值
這可考慮Application.YearFrac([G2], Date, 1)這樣整數部分就是年數，小數部分*12取整數是月數
或DateDiff("m", [G2], Date)這樣得到總月數，除以12就得到年，除以12的餘數就是月

通常要選擇使用事件程序驅動
考慮到事件的出口是一個很重要的問題
當你第一行IF Target.Column>1 Then Exit sub
這樣你的Select Case 就不會觸發到G欄位
而且不建議使用SelectionChange事件
用Change事件應該比較適當

chi830

回復 2# hugh0620


hugh0620 先進您好,

因經驗太淺，尚無法下載附件
又想了解一下先進對於此問題的寫法，
是否可麻煩先進Mail給我呢?
shin830@hotmail.com

非常感謝唷~

hugh0620

回復 1# 周大偉


    試一下附檔是不是你要的東西~
    傳回指定工作表值及年資問題_修改.rar (290.06 KB)

下載次數: 16

2011-4-6 11:34