返回列表 上一主題 發帖

[發問] 自動複製多活頁公式並貼上值(文長慎入)

您的需求看起來應該錄製巨集再稍做修改就可以了。能不能提供一些系統導出格式的假資料供測試?

TOP

回復 4# msmplay
不知道有沒有誤解您的意思,請測試看看。
測試檔0819.rar (697.58 KB)

TOP

回復 4# msmplay
測試檔0819.rar (698.71 KB)
7F的檔案沒有考慮到小計的問題,請使用這個測試。

TOP

本帖最後由 zyzzyva 於 2016-10-1 06:40 編輯

回復 14# msmplay
應該是'E化系統'的問題,因為sheet名稱也是英文開頭。
最簡單是改個名字,不然就是在跑迴圈的時候加限制。
例如For I = 1 To WS_Count,改成For I = 1 To 25 (只跑到 顧客問題(通訊類產品)),不過如果之後有新增或更動順序要再檢查。
或是If (aA >= 65 And aA <= 90) Or (aA >= 97 And aA <= 122) Then這句加個條件讓工作表名稱的開頭不能= "E"。

TOP

回復 15# GBKEE
對耶,寫的時候沒注意,感謝版大的提醒。

TOP

回復 14# msmplay
如果有用到的工作表命名上固定都會是IB、OB,那可以改成 If aA = 73 Or aA = 79 Then (只跑開頭 = "I" 跟 = "O"的)

TOP

        靜思自在 : 忘功不忘過,忘怨不忘恩。
返回列表 上一主題