Userform最大化(且內容比例自動放大?) - Excel程式區

1 2 34

返回列表下一主題上一主題發帖

[發問] Userform最大化(且內容比例自動放大?)

PKKO

　暱稱: PKKO

高中生 Rank: 3 Rank: 3

帖子: 549
主題: 152
精華: 0
積分: 691
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2010
閱讀權限: 50
性別: 男
註冊時間: 2013-8-10
最後登錄: 2022-9-7

論壇榮譽勳章論壇贊助勳章

31^# 跳轉到 »

發表於 2015-5-23 11:29 | 只看該作者

回復 27# bobomi

大大您好,前一篇的問題我都找到答案了,在SaveSetting ThisWorkbook.Name, "SSS"=>全部的USERFORM都指向同一個名稱即可n個表單都相同大小
另外還有一個問題(抱歉,問題很多...)

就是縮小按鈕會出現錯誤,不能縮小
我目前作法是將縮小按鈕沒得點,有辦法讓他不會出現錯誤,然後縮小到工作列,等到要用的時候再點一下工作列的檔案就會自動跳出原本大小的表單嗎?

ocx.Left = ocx_xy(0) * Rw
ocx.Top = ocx_xy(1) * Rh
ocx.Width = ocx_xy(2) * Rw
ocx.Height = ocx_xy(3) * Rh

複製代碼

錯誤發生在上方的height那邊

PKKO

TOP

bobomi

中學生 Rank: 2

帖子: 181
主題: 5
精華: 0
積分: 197
點名: 0
作業系統: XP
軟體版本: 2000
閱讀權限: 20
性別: 女
註冊時間: 2014-3-9
最後登錄: 2024-4-29

32^#

發表於 2015-5-23 19:46 | 只看該作者

本帖最後由 bobomi 於 2015-5-23 19:51 編輯

(1) 文字原本顯示四個字,只有出現三個字,現在也可自行靠拉寬一點就顯示出來正確比例,所以四個字都可以顯示
-> 我預設就是文字只有拉高才縮放, 拉寬則不縮放, 現在已經改成拉寬也會縮放
(2) 修正原作工作列看不到圖示

1.zip (48.15 KB)

TOP

PKKO

　暱稱: PKKO

高中生 Rank: 3 Rank: 3

帖子: 549
主題: 152
精華: 0
積分: 691
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2010
閱讀權限: 50
性別: 男
註冊時間: 2013-8-10
最後登錄: 2022-9-7

論壇榮譽勳章論壇贊助勳章

33^#

發表於 2015-5-24 09:33 | 只看該作者

回復 32# bobomi

大大,新版的使用上怪怪的

在切換不同表單的時候
下方程式碼的地方會無法執行

Private Sub UserForm_Activate()
modForm.UserForm_SetButton Me
End Sub

複製代碼

PKKO

TOP

bobomi

中學生 Rank: 2

帖子: 181
主題: 5
精華: 0
積分: 197
點名: 0
作業系統: XP
軟體版本: 2000
閱讀權限: 20
性別: 女
註冊時間: 2014-3-9
最後登錄: 2024-4-29

34^#

發表於 2015-5-24 22:10 | 只看該作者

1.zip (50.81 KB)

目前發現有一個問題
例如:
用滑鼠典擊 UserForm 使其最大化後
滑鼠移到工具列去點擊那個 EXCEL 圖示
EXCEL 整各會匯縮小到工具列 (這部分是正常的 )
再次點擊那個 EXCEL 圖示 , EXCEL 就會還原變大 (這部分也是正常的 )
問題來了
當 EXCEL 還原變大時
EXCEL 會多事的把處於最大化的 UserForm 自動調回一搬大小

這個暫時解決不了

TOP

s13030029