標題: [發問] 請問如何讓其它的活頁簿也能使用巨集？ [打印本頁]

---

作者: Genie    時間: 2020-4-27 18:41     標題: 請問如何讓其它的活頁簿也能使用巨集？

以下代碼是只修改選取的圖的 X 軸。
例如 Workbook1 有 5 張圖，選取其中 3 張，則只會修改選定的 3 張圖。

但現在遇到問題，若我的巨集放在 Workbook1，但圖在 Workbook2，
呼叫 Workbook1 的巨集要修改 Workbook2 的圖，可是 Workbook2 的圖的 X 軸並不會被修改。

請問我要如何修改呢？謝謝。

1. Sub Axis_select()
   
2. 
   
3. Application.ScreenUpdating = False
   
4. 
   
5. Dim cht As ChartObject
   
6. 
   
7. 
   
8. For Each cht In Selection
   
9. 
   
10.     cht.Chart.Axes(xlCategory).Select
    
11.     Selection.TickLabels.NumberFormatLocal = "#,##0.0;-#,##0.0;""POR"""
    
12. 
    
13. Next cht
    
14. 
    
15. 
    
16. Range("A1").Select
    
17. 
    
18. Application.ScreenUpdating = True
    
19. 
    
20. End Sub

複製代碼

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)