[文件] vba問題

[chunchanhung (毛毛狂)]

軟體:excel2016

我目前有兩個巨集 A B

先使用巨集A 判斷range(a:a)有幾筆內容就製作多少個sheet

再用B巨集整理每個sheet的資料不包含原始表格
因有使用for指令所以不能將B巨集模組寫在A巨集

想請問有辦法A巨集跑完之後，讓每個sheet自動跑B巨集嗎
-----
Sent from JPTT on my iPhone

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 42.73.41.27
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1547953532.A.52D.html
→ soyoso: b巨集模組是指？b巨集程序(sub)或是b巨集寫在不同於a巨集
→ soyoso: 的模組(module)
→ soyoso: 且有for迴圈而不能將b寫在a內的原因是？
→ soyoso: 想法是迴圈內於原本a巨集動作的最下方再呼叫b，call b或省
→ soyoso: 略call直接打程序名稱(b)
→ soyoso: 或是要跑完a後要跑b的話，就再設個迴圈來呼叫b的程序
→ soyoso: 如b內range無指定工作表的話，迴圈上就有可能先要
→ soyoso: worksheets(.).activate或select，worksheets可改為sheets
→ chunchanhung: 謝謝已經解決
→ chunchanhung: 另外想請問一下這個問題
→ chunchanhung: https://i.imgur.com/0vi8ZOD.jpg
→ chunchanhung: 我是用錄製巨集的方式來修改圖表
→ chunchanhung: 但我錄製完後，卻出現錯誤
→ chunchanhung: 是沒有定義嗎 還是不能這樣使用
→ soyoso: 圖表 3是股票圖嗎？應是作用圖表不支援該顯示圖表項目及顯
→ soyoso: 示方式
→ chunchanhung: https://i.imgur.com/NgPGP2u.jpg
→ chunchanhung: 是折線圖 想要使用線條 垂直線的功能
→ soyoso: 折線圖垂直線的話 msoElementLineDropLine
→ chunchanhung: 不好意思 想請問是怎麼改呢
→ chunchanhung: 錄製巨集代碼是
→ chunchanhung: Activechart.setElement(msoElementLineDrophilolin
→ chunchanhung: e
→ chunchanhung: 但是會跑出錯誤
→ chunchanhung: https://i.imgur.com/4HX446z.jpg
→ soyoso: 折線圖沒有msoElementLineDrophiloline所以跑出錯誤
→ soyoso: 改成回文的msoElementLineDropLine