摘要:
1- 区域命名 ThisWorkbook.Names.Item("foo").RefersTo =Tabelle1!$A$1:$B$1 ThisWorkbook.Names.Item("foo").RefersToRange.Address $A$1:$B$1 2- 一个有趣的case Sub 按钮 阅读全文
摘要:
11-19 For TK Sub CF抓取分拆() ' ' 宏1 ' Data页为prophet查询结果 ' 逐产品逐mp导出 ' Dim aa aa = Sheets.Count Do While aa > 2 aa = Sheets.Count Application.DisplayAlerts 阅读全文