Userfom Açmak

[bzace]

Arkadaşlar benim şöyle bir sıkıntım var.Dosyayı açtığım zaman iki adet userform alt alta açılıyor.Ben ise userformları yan yana aynı anda sayfada görmek istiyorum.Araştırdım ama hiç bilgi bulamadım böyle bir imkan varmıdır.Dosya yüklemeye gerek varmı ?

 

[asi_kral]

Merhaba
Tam olarak ne istediğinizi anlamadım ama.

Option Explicit
Sub aç()
UserForm1.Show 0
UserForm2.Show
End Sub

Bu kod iki userform'u da açar. Üstüste açtığından üsttekini sağa yada sola oynatmanız yeterli.

 

[mancubus]

şöyle bir şey olabilir. tasarım aşamasında UF boyutları ayarlanarak eşit şekilde yer alması sağlanabilir.

Sub iki_form_yanyana()
    With UserForm1
        .Show vbModeless
        .Left = .Left - .Width / 2
    End With
    With UserForm2
        .Show vbModeless
        .Left = .Left + .Width / 2
    End With
End Sub

 

[bzace]

Sayın Asi_kral istediğim sağa sola kaydırarak yapmak değildi.
Sayın Mancubus istediğimi karşılıyor.
Her ikinizede teşekkür ederim.