- 帖子
- 113
- 主題
- 31
- 精華
- 0
- 積分
- 149
- 點名
- 0
- 作業系統
- xp & vista
- 軟體版本
- 2003 & 2007
- 閱讀權限
- 20
- 註冊時間
- 2010-12-29
- 最後登錄
- 2020-5-22
|
以下代碼是只修改選取的圖的 X 軸。
例如 Workbook1 有 5 張圖,選取其中 3 張,則只會修改選定的 3 張圖。
但現在遇到問題,若我的巨集放在 Workbook1,但圖在 Workbook2,
呼叫 Workbook1 的巨集要修改 Workbook2 的圖,可是 Workbook2 的圖的 X 軸並不會被修改。
請問我要如何修改呢?謝謝。- Sub Axis_select()
- Application.ScreenUpdating = False
- Dim cht As ChartObject
- For Each cht In Selection
- cht.Chart.Axes(xlCategory).Select
- Selection.TickLabels.NumberFormatLocal = "#,##0.0;-#,##0.0;""POR"""
- Next cht
- Range("A1").Select
- Application.ScreenUpdating = True
- End Sub
複製代碼 |
|