Userform,dan Cikista anamenuye gidemiyorum

[Jezus]

Merhabalar
Cikista anamenuye geri gitmek istedim bu hatayi verdi nerede yanlis yapmis olabilirim acaba..? Yardim edebilirmisiniz

Private Sub CommandButton1_Click()
Unload Me
Anamenu.Show
End Sub

 

[xxrt]

Çıkış butonun bulunduğu UserForm adı nedir?
Anamenu.show adı doğrumu?
Anamenu.show Userformu arka planda çalışıyormu?

Uygunsa dosyaya bakalım.

 

[Jezus]

Dosya uygun buyrun

Merhaba
Dosya uygun buyrun bakabilirsiniz

 

[Levent Menteşoğlu]

Olmaması gereken bir referans işaretli bu sebeple hata alıyorsunuz. Alt+F11 ile vb editörünü açın. Sonra tools-references te "Missing:Abamsoft XP Button" referansındaki işareti kaldırın.

 

[Jezus]

Levent Hocam bu seferde textbox1 de hata veriyor... ya ben bu dosyalari birlestirmeden once tek tek yani ( elden.xls iscielden.xls geneltoplam.xls gibi ) rahat calistiriyordum siteye sordum ayri dosyalari ( 6ayri dosya ) bir macroda toplayip calistirabilirmiyim dedim olmaz dediler ok. eyvallah bende bunlari birlestirdim fakat nerden bilirdim ki bu kadar sorun olacak sakallarim beyazladi yahu neyse hocam varmi bunun bir cozumu yoksa bosuna ugrasip sizide bosuna mesgulmu ediyorum..?

Selamlar iyi calismalar


Jezus

 

[Levent Menteşoğlu]

Kim olmaz dedi bilemiyorum ama, tek dosyada da yapmak pekala mümkündür. Textboxtaki hata nedir?

 

[Jezus]

Levent hocam prog. bir hata verdi ondan sonrada acamadim onu atip baslangicta bir yedek yapmistim onu duzenleyip yolluyorum bir bakabilirsen tabii zamanin varsa.

Selamlar iyi calismalar



Jezus
-----------

 

[Jezus]

Ozur dosyayi unutmusum

Okadar daldimki dosyayi unuttum ozur.

 

[Levent Menteşoğlu]

Hemen gördüğüm hatayı söyleyeyim. Ana menüdeki "Elden musteri" butonuna "Eldenmusteri" ismini vermişsiniz. Bu aynı zamanda açmaya çalıştığınız userformunda ismi, iki nesneyede aynı ismi veremezsiniz. Butonun adını değiştirin. Birde önerim nesnelerin isimlerini mümkün olduğunca değiştirmeyin, sadece caption (başlık) u değiştirin.

Not:Tüm butonlarda aynı hata var.

 

[Jezus]

Tamam hocam fakat bunu neden yaptim ( Sener sen gibi ) hele bi sor neden yaptim
evet Userform1, Userform2 , Userform3 hepsi dediginiz gibiydi hata verince benimde kafam karisinca en iyisi dedim isim vereyim ama ayni seyler yani hatalar oldu

 

[Levent Menteşoğlu]

Ekte dosyanızda bazı düzeltmeler yaptım. Yukarıda yazdığım referansı kaldırmıştım. Bende hata veriyordu, siz tekrar gerekli ise işaretlersiniz.

 

[Jezus]

Levent hocam eline saglik kucuk bir soru daha sayfayi buyuttugumde buttonlar, cizgiler ortalanmiyor onu nasil yapariz,,? vakit varsa yoksa cok onemli degil cok cok tesekkur ederim ellerine saglik levent hocam


Selamlar
-----------
Jezus

 

[Levent Menteşoğlu]

Bu sorunuzu anlayamadım.

 

[Jezus]

Hacom bu asagidaki kodu girdigimde tam sayfa oluyor fakat kucuk cercevedeki gibi buttonlar ortali olmuyor sol ust koseye cikiyor demek istedigim buydu

Private Sub UserForm_Initialize()
With Genel
.Height = Application.Height
.Width = Application.Width
End With

 

[Jezus]

Ozur dilerim Hacom degil Hocam olacakti yorgunluk basladi galiba

 

[Levent Menteşoğlu]

Rica ederim önemli değil, Aşağıdaki linkte detaylı bilgi ve kodlar var onları uygulamanızı öneririm.

http://www.excel.web.tr/viewtopic.php?t=2548&highlight=application+height

 

[Jezus]

Sagolun Levent hocam cok tesekkur ederim.


Iyigeceler

Jezus