作者sampeng0970 (sam)
看板Office
標題[算表] VBA將所有SHEET名稱填入各SHEET的儲存格
時間Mon Jun 25 16:20:38 2018
軟體: EXCEL
版本: 2016
https://imgur.com/a/swWq4J5
如上圖想將0103活頁簿名稱，變成日期填入0103的A1儲存格，
以此類推0104名稱變成日期填入0104的A1儲存格，
0105、0106以此類推的VBA寫法。
感謝指教。
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.160.90.244
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1529914841.A.D1F.html
1F：→ soyoso: 迴圈於sheets或worksheets集合，可取得worksheet.name 06/25 16:33
2F：→ soyoso: sheets(name).range，儲存格a1。改為日期可以dateserial 06/25 16:34
3F：→ soyoso: 月和日則將name以left和right 06/25 16:34
4F：→ soyoso: 測試其他改為日期方面也可以連結字串為yyyy-mm-dd後以 06/25 16:38
5F：→ soyoso: datevalue、cdate或直接yyyy-mm-dd、mm-dd(測試會以m月d日 06/25 16:39
6F：→ soyoso: )顯示 06/25 16:39
7F：→ soyoso: 不以巨集方式的話，下方工作表名稱處右鐽選取所有工作表 06/25 16:42
9F：→ sampeng0970: 真的是太神了，感謝。以為只能用VBA解決，原來不用也 06/25 16:59