UserForm'un yeri.

[alpay1]

Merhaba Değerli Arkadaşlar,
Küçük Bir UserForm ‘ um var.Bu UserForm aktif olduğunda sayfanın en sağ tarafında durmasını istiyorum.Formun nerede duracağını kodlarla belirleyebilirmiyiz?
Teşekkürler.

 

[Levent Menteşoğlu]

sayın alpay

istediğiniz için ayrı bir koda gerek yok, bunu ayarlamak için userfomu seçin,"properties" penceresinde "position" kısmından "startupposition" seçeneğini "0-manuel" olarak seçin, bu seçimin ardından userformun ekrandaki yerini belirlemek için "left" ve "top" değerlerini değiştirin örneğin left=350,top=0 yaparsanız ekranın sağ üst köşesinde görünecektir.

selamlar

 

[alpay1]

Çok teşekkürler.

 

[Haluk]

Konu basit gibi görünmekle birlikte aslında biraz kazık bir konudur.

Ekran çözünürlüğü birbirinden değişik bilgisayarlarda leventm tarafından önerilen çözüm maalesef geçerli olmaz.

Aşağıdaki basit önerim de herzaman istenilen sonucu vermeyebilir çünkü XL uygulamasının "Maximize ekran" modunda olmasını gerektirir. Ama en azından ekran çözünürlüğü birbirinden değişik fakat "Maximize ekran" modundaki bütün XL oturumlarında istenilene yakın sonuç veririr.

Private Sub UserForm_Activate()
    Me.Left = Application.Width - Me.Width
    Me.Top = 0
End Sub

Aşağıdaki linkte ise konunun teferruatlı bir şekilde ele alındığını göreceksiniz.

http://www.cpearson.com/excel/FormPosition.htm

 

[ALPEN]

çünkü XL uygulamasının "Maximize ekran" modunda olmasını gerektirir.

maximize yapmak içinde

Private Sub UserForm_Activate() 
Application.WindowState = xlMaximized 
Me.Left = Application.Width - Me.Width 
Me.Top = 0
End Sub

 

[alpay1]

Sayın Alpen Bey,
Son verdiğiniz koduda denedim şu anda sorun yok.
Teşekkürler.