返回列表 上一主題 發帖

如何反向思考複製格式的方式!

yenwang

帖子
57 
主題
36 
精華
0 
積分
94 
點名
0  
作業系統
win7 
軟體版本
office2013 
閱讀權限
20 
註冊時間
2014-9-10 
最後登錄
2024-8-13 
1# 跳轉到 »
發表於 2015-3-5 19:15 | 顯示全部帖子

VBA取得線條的座標值!!

我想使用VBA將工作表中所畫的線條
其頭尾的座標值記錄下來
但是不清楚要如何動作
Selection.ShapeRange.Name 可以取得線條的名稱
那要使用哪個指令，才能取得線條，頭尾兩點的座標資料呢??

TOP

yenwang

帖子
57 
主題
36 
精華
0 
積分
94 
點名
0  
作業系統
win7 
軟體版本
office2013 
閱讀權限
20 
註冊時間
2014-9-10 
最後登錄
2024-8-13 
2#
發表於 2015-3-7 08:38 | 顯示全部帖子
回復 3# GBKEE


謝謝大家的幫助
有清楚且可以解決問題了
感恩

TOP

yenwang

帖子
57 
主題
36 
精華
0 
積分
94 
點名
0  
作業系統
win7 
軟體版本
office2013 
閱讀權限
20 
註冊時間
2014-9-10 
最後登錄
2024-8-13 
3# 倒序看帖
打印
tT
發表於 2015-3-7 08:43 | 顯示全部帖子

如何反向思考複製格式的方式!

由於現在的EXCEL的線條複製格式上
需要先在格式來源上點選
然後複製格式後
再點選要變更格式的線條
我想請問
有辦法反向思考嗎??
因為現在我要修改的格式可能有幾十條線條或是多邊形
我想先利用選取的方式
將這幾十線條或多邊形選取
然後按下巨集後
則要求選取預變成目標格式的線條
然後就是這幾十線條或多邊形的線型就依照所選取的目標格式修改
有辦法這樣子寫程式嗎???
收藏 分享

yenwang

帖子
57 
主題
36 
精華
0 
積分
94 
點名
0  
作業系統
win7 
軟體版本
office2013 
閱讀權限
20 
註冊時間
2014-9-10 
最後登錄
2024-8-13 
4#
發表於 2015-3-10 22:41 | 顯示全部帖子
[版主管理留言]
  • GBKEE(2015/3/11 06:14): 小學生沒有權限下載附件,上傳不成功附件看看

有範例下載看嗎？我都試不成功！

TOP

        靜思自在 : 站在半路，比走到目標更辛苦。
返回列表 上一主題