返回列表 上一主題 發帖

點下拉清單放大150倍問題

gca78000

帖子
53 
主題
16 
精華
0 
積分
74 
點名
0  
作業系統
windows xp 
軟體版本
OFFICE 2000 
閱讀權限
20 
性別
男 
註冊時間
2010-6-6 
最後登錄
2015-12-10 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2014-11-26 19:20 | 只看該作者

點下拉清單放大150倍問題

請問各位板大如一開始點下拉清單就會放大150倍而選擇完就會回復正常VBA要如何寫請指教謝謝

Sub 下拉清單8_Change()
ActiveWindow.Zoom = 150
End Sub

ActiveWindow.Zoom = 100

123.rar (7.11 KB)

收藏 分享

luhpro

帖子
835 
主題
6 
精華
0 
積分
915 
點名
1  
作業系統
Win 10,7 
軟體版本
2019,2013,2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-3 
最後登錄
2025-7-5 
2#
發表於 2014-12-2 21:36 | 只看該作者
請問各位板大如一開始點下拉清單就會放大150倍而選擇完就會回復正常VBA要如何寫請指教謝謝

Sub 下拉清單 ...
gca78000 發表於 2014-11-26 19:20

依你的需求寫的 :
123-a.zip (8.38 KB)

程式功能為 :
當滑鼠按下下拉式選單按鈕視窗立即放大至150% ,
但一旦放開滑鼠左鍵就會立即還原成 100% 的大小.

所以實際操作時 :
須先移到下拉式選單按鈕上 -> 按著滑鼠左鍵不放 -> 此時視窗會放大
-> 滑鼠游標移到放大後要選的選項上 -> 放開左鍵 -> 這時已選好項目且視窗也會縮回原來大小.

TOP

gca78000

帖子
53 
主題
16 
精華
0 
積分
74 
點名
0  
作業系統
windows xp 
軟體版本
OFFICE 2000 
閱讀權限
20 
性別
男 
註冊時間
2010-6-6 
最後登錄
2015-12-10 
3#
發表於 2014-12-3 18:12 | 只看該作者
回復 2# luhpro
原來如此謝謝uhpro大大指導小弟受教了

TOP

        靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。
返回列表 上一主題