butonda hata mesajı

[limanC34]

Selam Arkadaşlar
Userform2 ye geçmek için RAPOR butonuna tıklayınca hata mesajı veriyor.Anlayamadım.
Teşekkürler.

 

[Orion1]

Userform2'nin initialize olayında olmayan bir sayfa seçilmek isteniyor ve set edilmek isteniyor.Hata bu yüzden oluyor.
Aşağıda ki kodlarda kırmızı satırla yazılmış kodları silin Userform2 çalışacaktır.

Private Sub UserForm_Initialize()
    [B][COLOR="Red"]'Set sv = Sheets("veri")
    'sv.Select[/COLOR][/B]    
With Range("a10:a" & [a65536].End(3).Row)
        .AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("H2"), unique:=True
    End With
    a = Range("H3:H" & [H65536].End(3).Row).Value
    ComboBox1.List = Range("H3:H" & [H3].End(4).Row).Value
    [h:h].ClearContents
End Sub

 

[limanC34]

Sayın Hocam
Yapamadım.Gönderdiğiniz formülü nereye yapıştırsam olmadı.Daha doğrusu işi baya karıştırdım galiba.Hep aynı hata mesaj.Biliyorum mesaj bana ama.

 

[karadami]

commandbutton5 in kodlarinin sonundaki 0 i silin

Private Sub CommandButton5_Click()
UserForm2.Show [COLOR=red][B][U]0[/U][/B]
[/COLOR]End Sub

 

[Orion1]

Sayın Hocam
Yapamadım.Gönderdiğiniz formülü nereye yapıştırsam olmadı.Daha doğrusu işi baya karıştırdım galiba.Hep aynı hata mesaj.Biliyorum mesaj bana ama.

Dosyanız ekte.

 

[limanC34]

Sayın Evren Gizlen
Aslında istediğim userform1 den ÇIKIŞ sayfasına yaptığım kayıtlar içinden userform2 ile görüp RAPOR sayfasına atmak ve gerektiğinde çıktı almaktı.Fakat hem istediğim hemde anlatmaya çalıştıklarım tabiî ki örtüşmüyor olabilir.Bunun için kusura bakmayın.Kısaca iki tarih arasında VERİLEN SERVİS bazında hangi MALZEME ne kadar kullanılıyor görmek ve yazdırmak istemiştim.
Saygılarımla.

 

[Orion1]

Sayın Evren Gizlen
Aslında istediğim userform1 den ÇIKIŞ sayfasına yaptığım kayıtlar içinden userform2 ile görüp RAPOR sayfasına atmak ve gerektiğinde çıktı almaktı.Fakat hem istediğim hemde anlatmaya çalıştıklarım tabiî ki örtüşmüyor olabilir.Bunun için kusura bakmayın.Kısaca iki tarih arasında VERİLEN SERVİS bazında hangi MALZEME ne kadar kullanılıyor görmek ve yazdırmak istemiştim.
Saygılarımla.

Selam Arkadaşlar
Userform2 ye geçmek için RAPOR butonuna tıklayınca hata mesajı veriyor.Anlayamadım.
Teşekkürler..

Bu konu hakkında sorunuzun cevabını aldınız sanırım.

 

[limanC34]

Sayın Hocam
Elbetteki '' EVET '' cevabımı aldım.Ama yapmak istediğimi nasıl yapabiliriz desem sizi yormuş olurmuyum?Sabrınıza saygılarımla.