iT邦幫忙

1

想請教Excel 表單 在多螢幕的 顯示位置控制

  • 分享至 

  • xImage

想請教Excel 表單 在多螢幕的 顯示位置控制?
可否設定為EXCEL檔案 開啟的畫面中央?
[說明]
目前使用三個螢幕操作,EXCEL開啟檔案 可能在 1/2/3 任意畫面
但是 當點選功能要SHOW 表單USERFORM ,都只會在 1 的畫面顯示

有嘗試過屬性的 StartUpPositon 一樣都是多螢幕的畫面1

請問有辦法 讓EXCEL檔案 開在畫面3 時,開啟的表單也跟著在畫面3顯示嗎?

https://ithelp.ithome.com.tw/upload/images/20210929/20009841EoTtZW9JL8.jpg

操作的畫面,表單跳到畫面1 的筆電螢幕上
https://ithelp.ithome.com.tw/upload/images/20210929/20009841C2bRRJaKMR.jpg

無解,印象中不只 EXCEL 有這個問題,很多都有,很多的應用程式本身不支援多重螢幕,他沒辦法讓某個應用程式右鍵顯示到螢幕幾,但支援的就可以這麼做
但是有第三方軟體,但我不知道你該如何透過程式去呼叫讓表單顯示在你想要的螢幕上,去找這各小軟體 multimonitortool ,他可以透過指令在你想要的螢幕執行應用程式,不過他還是無法有我前面說的那種功能,只能夠過指令來處理目標螢幕
achan iT邦研究生 4 級 ‧ 2021-09-29 16:21:54 檢舉
我後來英文google 後 有解答了 謝謝各位

'http://www.vbaexpress.com/kb/getarticle.php?kb_id=356
'https://www.mrexcel.com/board/threads/userform-positioning.501635/
Private Sub UserForm_Activate()
With UserForm1
.Top =Application.Top + 125
.Left = Application.Left+25
End With
End Sub
'----------------------以下其他建議--------- 顯示螢幕對了 但是位置有問題
Private Sub UserForm_Activate()
'Position top/left of Excel App
Me.Top = Application.Top
Me.Left = Application.Left

'Approx over top/left cell (depends on toolbars visible)
Me.Top = Application.Top + (Application.UsableHeight / 2)
Me.Left = Application.Left + (Application.UsableWidth / 2)
End Sub
----------------------------------------------------------------------------------
Private Sub UserForm_Initialize()
'SOURCE: www.TheSpreadsheetGuru.com/the-code-vault

'Start Userform Centered inside Excel Screen (for dual monitors)
Me.StartUpPosition = 0
Me.Left = Application.Left + (0.5 * Application.Width) - (0.5 * Me.Width)
Me.Top = Application.Top + (0.5 * Application.Height) - (0.5 * Me.Height)

End Sub
圖片
  直播研討會
圖片
{{ item.channelVendor }} {{ item.webinarstarted }} |
{{ formatDate(item.duration) }}
直播中

尚未有邦友回答

立即登入回答