[算表] VBA将所有SHEET名称填入各SHEET的储存格

楼主: sampeng0970 (sam)   2018-06-25 16:20:38
软件: EXCEL
版本: 2016
https://imgur.com/a/swWq4J5
如上图想将0103活页簿名称,变成日期填入0103的A1储存格,
以此类推0104名称变成日期填入0104的A1储存格,
0105、0106以此类推的VBA写法。
感谢指教。
作者: soyoso (我是耀宗)   2018-06-25 16:33:00
循环于sheets或worksheets集合,可取得worksheet.namesheets(name).range,储存格a1。改为日期可以dateserial月和日则将name以left和right测试其他改为日期方面也可以连结字串为yyyy-mm-dd后以datevalue、cdate或直接yyyy-mm-dd、mm-dd(测试会以m月d日)显示不以宏方式的话,下方工作表名称处右鐽选取所有工作表于储存格a1 https://i.imgur.com/BYDGISr.jpg
楼主: sampeng0970 (sam)   2018-06-25 16:59:00
真的是太神了,感谢。以为只能用VBA解决,原来不用也

Links booklink

Contact Us: admin [ a t ] ucptt.com