Talep formu oluşturma

[ilahisacmalik]

Merhaba Sn. Arkadaşlar,

Yine formdan bir arkadaşın 'adres defteri' olarak düzenlediği bir makrolu çalışma buldum ve ihtiyacıma göre düzenledim. Fakat takıldığım bir nokta var...

Belgedeki makrolar çok güzel çalışıyor ama, eklemek istediğim birkaç özellik konusunda takıldım.

Birincisi; çalışma üzerinde göreceğiniz üzere 'TÜM TALEP İÇERİKLERİNİ GÖRÜN' bu botuna tıklayınca Talep_Icerigi sayfası açılacak ve makro paneli kapanacak.

İkincisi ise; 'Talep numarasına göre ara' kısmıyla ilgili, kutucuğa talep numarasını yazdıktan sonra talepleri listeye tıkladığım zaman yeni bir pencerede veya daha uygun bir şekilde... buna siz karar verin... o talep numarasına ait kaç adet ürün varsa listelenecek. ekteki dosyayı incelerseniz ne istediğimi tam olarak anlarsınız sanıyorum...

Yardımcı olacak üstadlara şimdiden çok teşekkür ederim.

 

[ilahisacmalik]

Arkadaşlar birinci isteğimi başardım... yaptım... sadece ikincisi kaldı. Talep arama işlemi için yardımlarınızı bekliyorum, saygılar...

 

[ilahisacmalik]

Acaba girilmiş talep numaraları Combobox içinde listelense ve seçip talebi göster desek? Böyle halletmeye çalışsak?

 

[antonio]

Merhaba Sn. Arkadaşlar,

Yine formdan bir arkadaşın 'adres defteri' olarak düzenlediği bir makrolu çalışma buldum ve ihtiyacıma göre düzenledim. Fakat takıldığım bir nokta var...

Belgedeki makrolar çok güzel çalışıyor ama, eklemek istediğim birkaç özellik konusunda takıldım.

Birincisi; çalışma üzerinde göreceğiniz üzere 'TÜM TALEP İÇERİKLERİNİ GÖRÜN' bu botuna tıklayınca Talep_Icerigi sayfası açılacak ve makro paneli kapanacak.

Private Sub CommandButton5_Click()
Unload Me
Worksheets("Talep_Icerigi").Activate
End Sub

İkincisi ise; 'Talep numarasına göre ara' kısmıyla ilgili, kutucuğa talep numarasını yazdıktan sonra talepleri listeye tıkladığım zaman yeni bir pencerede veya daha uygun bir şekilde... buna siz karar verin... o talep numarasına ait kaç adet ürün varsa listelenecek. ekteki dosyayı incelerseniz ne istediğimi tam olarak anlarsınız sanıyorum...
Yardımcı olacak üstadlara şimdiden çok teşekkür ederim.

Private Sub CommandButton6_Click()
Dim sh As Worksheet, ss As Integer, alan As Range, aranan As Integer
Set sh = Worksheets("Data")
ss = sh.Range("A" & Rows.Count).End(3).Row
Set alan = sh.Range("A1:A" & ss)
aranan = TextBox17.Value
sat = Application.WorksheetFunction.Match(aranan, alan, 0)
For i = 1 To 11
Controls("TextBox" & i).Value = sh.Cells(sat, i).Value
Next i
End Sub

 

[sametozyavuz]

ekteki çalışmamı bir deneyiniz.

 

[ilahisacmalik]

sametozyavuz bey ilginiz için çok teşekkür ederim ama ürünleri listeleye tıkladığım zaman bir panel açılsın ve 'talep içerik' sayfasındaki o talep numarasını taşıyan ürünler listelensin...

antonio bey ilginiz için çok teşekkür ederim verdiğiniz kodu deniyorum hemen...

 

[ilahisacmalik]

Sn. antonio,

Verdiğiniz ikinci kodu ilgili yere ekledim ama "compile error: for without next" hatası alıyorum. textbox a yazacağım talep numarasını talep içeriği sayfasından çekip yeni bir pencerede listelemek istiyorum... yardımlarınız için teşekkürler

 

[antonio]

Sn. antonio,

Verdiğiniz ikinci kodu ilgili yere ekledim ama "compile error: for without next" hatası alıyorum.

Haklısınız. En son satırın (End Sub) bir üstüne Next i yazınız. Bu arada Kodu da düzelttim. Yeniden kopyalayıp yapıştırın. Benim yaptığım uygulmaya göre ürün numarasına göre ürün detayları, yukarıdan aşağıya sıralamış olduğunuz TextBoxlara gelecektir.

 

[ilahisacmalik]

Anladım Sn. antonio,

Fakat istediğim şey ve en uygun olacağını düşündüğüm, 'Talep Numarasına Göre Ara' kutucuna talep numarası girip ara butonuna tıkladım zaman onun altında bulunan 'Talep İçeriği Tablosu'nda bir listenin görünmesidir. Bu listeyi de, Talep_Icerik sayfasından çekmek istiyorum.

Ekteki örnek dosyadaki gibi, Talep_Icerik sayfasında "Talep No" altında bulunan 2013/0001 numaralı taleplerin hepsi Talep_Icerik sayfasındaki A1 satırında bulunan başlıklar altında listelenecek.

Umarım ne istediğim tam olarak anlatabiliyorumdur... Bu hususta ivedi yardımlarınızı rica ediyorum... Çok teşekkürler, saygılar...

 

[ilahisacmalik]

Bu listeleme işlemi yaptığım araştırmalara göre Listview ile yapılıyormuş. Ben ekledim listview'i çalışmama ama, arama kutucuğuna veri girip arama butonuna tıkladıktan sonra Talep_Icerik sayfasındaki verileri nasıl listeleyecek listview de? Yardımlarınızı talep ederim, saygılarımla...

 

[ilahisacmalik]

Arkadaşlar yardımlarınızı talep ediyorum...

 

[ilahisacmalik]

Bu konuyla ilgili sorunları hallettim. Teşekkürler. Konu kapana bilir.