EXCEL VBA程式設計第15次上課
完整影音：
http://terry55wu.blogspot.com/p/autocad2008dvd.html
想提高EXCEL的工作效率會用VBA真的差很多，要做專業的介面和快速處理大型試算表的資料可以看看這次上課的影音分享。
今天的課程主要的兩個範例都非常實用，
光學會如何把網路上本來有保護的股市資料變成可以下載到EXCEL做處理就已經很夠本了，
再家大家用VBA處理大量的資料，成為自己想要的結果，而且是一個按鈕就可以完成的，
程式隨然很複雜，但老師的工作就是把複雜的知識變簡單，把看不懂的程式變的看懂，
所以註解清楚與程式邏輯與步驟就變的非常重要，老師都會寫的很清楚，自然學生能學會了!
並且錄下影音給學生回家複習，即便EXCEL VBA程式設計超難學，依舊很少有同學缺課。
今天的範例之前有很多學員詢問到，工作上的需求很大，
但由於課本的範例程式碼非常複雜，所以就自己簡化成十行左右的程式，讓學員學的又快又好，
並全成錄製影音，可以回去慢慢觀看，學程式設計若是一次就聽懂那是天才，
所以要學會還真的要影音輔助不可，這也許是目前教程式設計老師需要面對的課題，
不過要錄製影音就要功力啦!我自己錄了六年以上，才慢慢熟析，加上除了錄製還要教學，
要注意兩者實在不意，更重要的事錄完後要馬上給分段名稱，否則後製太耗時間。
目前甚至即時提供影音與程式碼畫面，就是一定學員學會，看的出來大家真的很認真，也幾乎都有做出來。
另外，延伸範例是取得網路上的股市資料，可是股市資料有保護，如果不懂破除保護的方法是無法取得資料的，
要如何破解也是本次上課的重點，有了這樣的方法就可以自動批次的下載股市資料，
並做後續的處理與分析，這就是VBA的價值，甚至做到即時通知使用者的目的。
常常有學生跟我說，他買了一堆EXCEL VBA的書，看沒有一本真的看的懂，
與其浪費時間自學，不如跟吳老師學習來的快很多，而且也比較沒有挫折感，
加上省下非常多的時間浪費在看不懂的程式設計上，不如讓老師引導的快很多。
吳老師 100/12/30
01_問題20時間反序複習
02_案例郵遞區號重組
03_案例郵遞區號重組&區域
04_問題21西曆換中曆
05_問題21西曆換中曆
06_問題21民國轉西元
07_問題21民國轉西元
吳老師教學網：
http://3cc.cc/10g
部落格：
http://terry55wu.blogspot.com/
論壇：
http://groups.google.com/group/excelvba_cloud?hl=zh-TW
溫馨考場論壇：
http://123.205.192.177/uc/bbs/index.php/
EXCEL,VBA,函數,吳清輝老師,湜憶電腦,程式設計,線上教學,e化創新,雲端計算,虛擬電腦,吳老師提供
民國轉西元excel 在 [算表] 文字格式的民國日期轉西元並計算年齡- 看板Office 的美食出口停車場
軟體: OFFICE
版本: 2016
今天在幫忙處理一份 Excel表
其中要計算至 "今天(開啟檔案時)" 的年齡(足歲)
因為日期的欄位格式是 "文字"，所以不能夠直接用
參考 PTT 及 GOOGLE 上的資料後，總算用下列公式弄出來
| | A欄 | B欄 |
| 1列 | 民國 | 年齡 |
| 2列 | '60/01/31 | 50 |
| 3列 | '60/12/31 | 49 |
| 4列 | '100/01/31 | 10 |
| 5列 | '100/12/31 | 9 |
公式
=DATEDIF(TEXT(DATE(LEFT(RIGHT("0"&SUBSTITUTE(A2,"/",""),7),3)+1911,
MID(RIGHT("0"&SUBSTITUTE(A2,"/",""),7),4,2),
RIGHT(RIGHT("0"&SUBSTITUTE(A2,"/",""),7),2)),"yyyy/mm/dd"),TODAY(),"Y")
裡面用到 SUBSTITUTE 將原本文字格式裡的 / 刪除
因為民國日期有 6碼 或 7碼，利用 RIGHT 將其補到 7碼
然後利用 DATE 及 LEFT+1911/MID/RIGHT 來轉換成 西元年月日
接著利用 TEXT 轉換為文字，這是為了給後面的 DATEDIF 用
最後使用 DATEDIF 並配合 TODAY(),"Y" 來轉換為年齡(足歲)
也許有更好的方法，不過這是我目前唯一知道的方式
提供給有需要的人
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.161.126.13 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1625295682.A.23B.html
※ 編輯: rfx6724 (1.161.126.13 臺灣), 07/03/2021 15:03:54
※ 編輯: rfx6724 (1.161.126.13 臺灣), 07/03/2021 15:04:18
... <看更多>