Userformun boyunu değiştirebilmek.

[Orion1]

Merhablar.
Kullanıcı UserForm'u, Userform çalışırkken Boyutunu Kenarlarından çekerek uzatıp genişletebilsin ve Tam ekran ekran pencereciğinden Tıklayınca tam ekran tekrar tıklayınca eski durumuna getirebilsin.
Tıpkı bir windows programındki pencereler gibi.
Teşekkür ederim.
İyi çalışmalar.

 

[efeboral]

Aşağıdaki link sanıyorum sizin istediğiniz uygulamarı kapsıyor.
http://www.excel.web.tr/viewtopic.php?t=978

 

[Orion1]

Merhabalar.
Sn:Alpen'in yazdığı kodlar aşağıdaki gibi.
UserForm Büyüyor.Ve textbox'ta Onun'la beraber büyüyor.
UserForm'un Üzerindeki Nesneler ,Userform Tam ekran olsun Ama,
UserForm'un üzerindeki nesneler Vb editöründe ayarladığım boyutta ve yerde kalmasını istiyorum.
Teşekkür ederim.

Private Sub UserForm_Initialize() 
With Application 
.WindowState = xlMaximized 
Zoom = Int(.Width / Me.Width * 100) 
Width = .Width 
Height = .Height 
End With 
End Sub

 

[abdi]

örneği inceleyin belki bir yardımı olur

 

[Orion1]

Merhabalar.
Yolladığınız dosya için teşekkür ederim.
UserForm'un boyutunu nasıl büyütücem?
Bir yere ayrıyetten değer mi giricem?
İyi çalışmalar.

 

[abdi]

hayır kenarlarından tutup çekerek istediğiniz boyuta ayarlayabilirsiniz

 

[Orion1]

Mehabalar.
Tamam propertiesten değiştiriyormuşuk.
Userform büyünce Nesneler en üste taşınıyor.
Teşekkür ederim.
İyi çalışmalar.
:hey:

 

[abdi]

rica ederim bi fikir verebildi isek ne mutlu bize

saygılar sevgiler
çalışmalarınızda başarılar

edit
başka bir örnek daha eklendi

 

[Orion1]

Merhabalar.
Sayın Abdi Teşekkür ederim.
İyi çalışmalar.
:hey: