返回列表 上一主題 發帖

關於顯示解析度VBA調整問題!!

yenwang

帖子
57 
主題
36 
精華
0 
積分
94 
點名
0  
作業系統
win7 
軟體版本
office2013 
閱讀權限
20 
註冊時間
2014-9-10 
最後登錄
2024-8-13 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-11-9 22:32 | 只看該作者

關於顯示解析度VBA調整問題!!

大家好
想請問關於DPI的問題
因為Excel檔案上會畫圖型或是線條
但往往畫完之後
mail給其他人
可能因為別人的螢幕顯示Dpi不一樣
像我設定為96dpi
同事可能設定為120dpi
結果就造成我畫完的圖形或線條
在他那邊顯示就是錯位的狀況><
請問這問題有辦法用VBA解決嗎??
譬如我在96dpi畫完之後
別人用120dpi開啟，只要按了程式，就會將圖形自動調成120dpi的狀況
應該有個辦法將96dpi與120dpi間做轉換吧!!
收藏 分享

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
2#
發表於 2016-11-10 07:44 | 只看該作者
回復 1# yenwang
請參考 取得系統資訊/使用者資訊
這是一篇非常棒的文章，由  Hsieh 版主分享的論題，

TOP

yenwang

帖子
57 
主題
36 
精華
0 
積分
94 
點名
0  
作業系統
win7 
軟體版本
office2013 
閱讀權限
20 
註冊時間
2014-9-10 
最後登錄
2024-8-13 
3#
發表於 2016-11-21 23:09 | 只看該作者
回復 2# c_c_lai

感謝回復，只是現在電腦多已64bit，原程式碼只是32bit，所以都會有錯誤!!

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
4#
發表於 2016-11-23 11:16 | 只看該作者
回復 3# yenwang
原先之
  1. Private Declare Function
複製代碼
宣告請改成：
  1. Private Declare PtrSafe Function
複製代碼
若要確保和VBA 6 版及先前版本的回溯相容性，請使用下面結構：
  1. #If Vba7 Then Declare PtrSafe Sub... #Else Declare Sub... #EndIf
複製代碼

TOP

        靜思自在 : 【時間無法遮擋】怕時間消逝，花了許多心血，想盡各式方法要遮擋時間，結果是：浪費了更多時間，且一無所成！
返回列表 上一主題