返回列表 上一主題 發帖

[發問] 提到最上層級移到最下層的寫法?

freeffly

帖子
586 
主題
123 
精華
0 
積分
763 
點名
0  
作業系統
WINDOW7 
軟體版本
Office 2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-16 
最後登錄
2017-3-14 

熱烈參與勳章好學求知勳章
1# 跳轉到 » 正序看帖
打印
tT
發表於 2011-12-1 10:59 | 只看該作者

[發問] 提到最上層級移到最下層的寫法?

附件我用錄製的方法取得的巨集
再執行依次會出現錯誤
請問如果要用vba執行提到最上層跟移到最下層要怎麼寫?
新增Microsoft Excel 工作表.rar (7.98 KB)
收藏 分享
字典兩各字 還真難理解

freeffly

帖子
586 
主題
123 
精華
0 
積分
763 
點名
0  
作業系統
WINDOW7 
軟體版本
Office 2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-16 
最後登錄
2017-3-14 

熱烈參與勳章好學求知勳章
2#
發表於 2011-12-1 11:44 | 只看該作者
  1.     ActiveSheet.ChartObjects("圖表 2").Activate
  2.     ActiveChart.ChartArea.Select
  3.     Selection.ShapeRange.ZOrder msoSendToBack
複製代碼
上面是錄製的，下面是查出來的方式
有人可以告訴我chartobjects 跟 shapes的差異嗎
為什麼會錄製的不能執行
改成下面才能執行?
  1. ActiveSheet.Shapes("圖表 2").ZOrder msoBringToFront
複製代碼
字典兩各字 還真難理解

TOP

        靜思自在 : 發脾氣是短暫的發瘋。
返回列表 上一主題