• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

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
 
Userformu sabit yapmaktan kastınız nedir?
 
Sub Hesapla()
Screen.updating = False

...

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

Şeklinde deneyin.
 
Userformun fare ile taşınamamasını istediğinizi farzederek ekli dosyayı inceleyin.
 
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.
 
labellerin isimlerinde hata var onları düzeltin.
 
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.
 
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.
 
Geri
Üst