[發問] 以控制項Nrange填入的起迄期數產生效果檔案。

papaya

PS︰問題有類似(重複)~請移除前題。
謝謝!

附件︰
BASE.rar (202.79 KB)

下載次數: 6

2019-3-3 15:31

想將BASE(提問主檔)的程式碼，改為如下列的2個需求~
需求1︰設立Nrange控制項，以利產生效果檔案~
當控制項內填入1000，則產生名稱="排序1000"的1個效果檔案；
效果檔案內有名稱="總表"和名稱="排序1000"等2個工作表

當控制項內填入1010-1020，則產生名稱="排序1010-1020"的1個效果檔案；
效果檔案內有名稱="總表"和名稱="排序1010"，"排序1011"，.....，"排序1019"，"排序1020"等12個工作表。

當控制項內填入1000,1010-1020，則產生名稱="排序1000"和名稱="排序1010-1020"的2個效果檔案；
2個效果檔案內的工作表同上。

其餘以此類推。

當有名稱相同的效果檔案產生，則新產生的效果檔案覆蓋前已產生的效果檔案。

需求2︰各效果工作表的內容~
工作表名稱="總表"的內容=複製BASE(提問主檔)的DATA!A︰J貼上"總表"!A1。
凍結視窗"B2"

效果檔案內除了名稱="總表"以外的其他各效果工作表的內容~
A1填入= Nrange控制項內各組合數字(以逗點分隔)並標示金色圖樣
凍結視窗"B2"

請詳見附件︰排序1000(效果檔)；排序1010-1020(效果檔)

請問︰
BASE(提問主檔)的VBA程式碼要如何重新編寫？
請各位大大幫忙!謝謝各位!

papaya

抱歉!附件的"排序1100-1020"(效果檔)，名稱有筆誤，正確名稱應為"排序1010-1020"(效果檔)。
謝謝!

papaya

回復 3# stillfish00

感謝您的幫忙和指導