Userform neden hareket ediyor

Katılım
20 Aralık 2006
Mesajlar
68
Excel Vers. ve Dili
.
Merhaba
Ekteki dosyada , spinbuttonlara tıklayınca sebebini anlayamadığım şekilde userform hareket ediyor.Siteden hareketi engelleyen bir kod bulamadım.
Bulabildiğim tek kod aşağıdaki.Bu da userformu hem sabit yapıyor.Hem de tuhaf bir görüntü oluşuyor.(Not: mağaza takip bölümü kodları Veyselemre ye aittir.)

Private Sub UserForm_Initialize()
xFrm = (Application.Width - Me.Width) / 2
yFrm = (Application.Height - Me.Height) / 2
Me.Left = xFrm
Me.Top = yFrm

Private Sub UserForm_Layout()
Me.Left = xFrm
Me.Top = yFrm

End Sub
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,058
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Userformu sabit yapmaktan kastınız nedir?
 

Merhum İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,094
Excel Vers. ve Dili
Excel, 365 - İngilizce
Sub Hesapla()
Screen.updating = False

...

Diğer kodlar
...
Screen.updating = True
End Sub

Şeklinde deneyin.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,058
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Userformun fare ile taşınamamasını istediğinizi farzederek ekli dosyayı inceleyin.
 
Katılım
20 Aralık 2006
Mesajlar
68
Excel Vers. ve Dili
.
Form artık hareket etmiyor fakat sonuçları gösteren labeller da güncellenmiyor.Her seferinde formu açıp kapamam gerekiyor.
problemi yaratan kodlar hesapla bölümünde, (call hesapla komutu)labelleri anında güncelleyecek başka bir kod bulabilirsek sanırım sorun çözülür.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,058
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
labellerin isimlerinde hata var onları düzeltin.
 
Katılım
20 Aralık 2006
Mesajlar
68
Excel Vers. ve Dili
.
Levent hocam sağolun , verdiğiniz örnek de işimi %80 görür.Benim anlatmaya çalıştığım şuydu; spinbuttonlardan birine tıklayıp değerleri değiştirince sebebini anlayamadığım bir şekilde userform olduğu yerden durup dururken aşağıya kayıyor.Bu da haliyle sinirbozucu bir durum.Spinbuttonlara bağlı bir hesapla makrosu var , spinler bu makroyu call komutu ile harekete geçirince bu sorun oluşuyordu.
Bir de eliniz değmişken tüm mağazaların yanına , birer aktif progressbar yerleştirmede yardımcı olursanız çalışma tamamlanacak.(spinlerin yanındaki % değerlerine bağlı)
Teşekkürler.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,058
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Aslında dosyanızdaki sorun TOP isimli bir değişken tanımlamanızdan kaynaklanıyor, bu tip VBA içinde kullanılan özellikleri değişken adı olarak kullanmayın top özelliği bir nesnenin bulunduğu yerin üst çizgiye göre konumunu verir, örneğin userform1.top gibi, eğer ilk dosyanızdaki TOP değişkeni TOP1 olarak değiştirirseniz sorun çözülür.
 
Üst