Sorgu için arama sonuçları: Listbox1+redim

Merhaba, bir çok forumda dolaşarak ekteki excel çalışmasını oluşturdum. bir çok noktada takıldım belki sizler için çok kısa sürecek sorunları saatlerce uğraşarak bu hale getirdim. Öncelikle adım adım sıkıntılarımdan bahsedeyim. Combobox daki herhangi bir değere göre listbox'ı süzmek...

Arkadaşlar altaki kodlamada for next yerine ne kullanabilirim ? örnek dosya ektedir...

Private Sub arama_kriteri_Change() Dim S1 As Worksheet, S2 As Worksheet, Veri As Range, say As Long Set S2 = Sheets("MüşteriBilgileri") ReDim Dizi(1 To 8, 1 To 1) If arama_kriteri = "" Then UserForm_Initialize Else say = 0 Set Data = S2.Range("A1:P" &...

Forumda emeği geçen herkese merhaba. Arkadaşlar aşağıdaki kodlarda ne gibi bir hata var ki sonuç alamıyorum. Yapmaya çalıştığım şey kısaca şu. ListBox1 e tıkladığımda bazı işlemler yaparak Listbox2 ye listeliyor. Derdim listbox1 in satır sayısı kadar tıklayarak listbox2 nin 7. satırındaki...

Değerli arkadaşlar Private Sub CommandButton1_Click() Dim k As Range, ilk_adres As String, a As Long Dim i As Long, syf As String ListBox1.Clear If TextBox1.Value = "" Then Exit Sub ReDim myarr(1 To 12, 1 To 1) For i = 1 To ComboBox1.ListCount - 1 If ComboBox1.Value <> "HEPSİ" Then syf =...

sayın hocalarım merhaba bir userformum var bu formda bulunan listbox a 3 combobox ile filtreleme yapıyorum buraya kadar sorun yok ancak örneğin istanbulu filtreliyorum daha sonra muhasebe yi filtreliyince tüm illerde ki muhasebe geliyor kodum aşağıda ne yanlış var acaba burada 1 nci combobaxın...

Arkadaşlar aşağıdaki kod ile data sayfasındaki e sutununda bulunan değerleri userform listbox üzerinde combobox ile süzme işlemi yapıyorum e sutunundaki veriler A1,A2,A11,A12,D1,D2,D11 şeklinde şimdi ben comboboxta A1 i seçtiğimde A11 ve A12 lerde listboxta görünüyor yani A1 değerinde A'dan...

Forumda ve bende bu konuda sayısız örnek var. Ancak eminim benim gibi çok sayıda insan da hala bu kodların anlamını çözememiştir. Neyi istediğimi eklediğim örnek dosyada net bir şekilde açıkladım. Özetle istediğim: Özellikle redim myarray() ve redim preserve myarray() içine yazılan 1 to 5, 1 to...

merhabalar, Aşağıdaki kod bir alıntıdır.Değiştirmeye çalışıyorum. Sorunum şu; Listbox1 click olayında e ile f sutunu çarpma işlemi sonucunda h sutununda sonucu 0,0 olarak gösteriyor. Yardımlarınız için teşekkürler.. Private Sub listbox1_Click() ' Sheets("GELEN").Cells(Rows.Count...

Merhabalar. "Klasör ve dosya oluşturma seçenekleri" http://www.excel.web.tr/f133/klasor-ve-dosya-olu-turma-secenekleri-t68040.html Aşağıdaki kod değerli üstad Sayın Halit Hocamızın üstteki başlıkta işlediği envai çeşit kodlardan birtanesi. Kendisine bir kez daha teşekkür ediyorum. Kodun...

Değerli arkadaşlar cari hesaplar ile ilgili kullandığım bir programda bir UserForm mevcut ve liste sayfasındaki müşterileri bu User formu kullanarak buluyorum yanlız orda şöyle bir sıkıntı mevcut Userform uzerindeki textbox'sa birşeyler yazıp silmem gerekiyor yoksa alttaki listboxsa isimler...

Arkadaşlar listbox'da textbox ile süz yapmak istiyorum bir türlü yapamadım. Aşağıdaki şekilde yazıyorum, örneklerden alıntı yaparak hata veriyor. Lütfen yardım Private Sub TextBox17_Change() Dim k As Range, adrs As String, j As Byte, a As Long ReDim myarr(1 To 17, 1 To 1) With Worksheets("Ana")...

Merhaba, Aşağıdaki listbox kodunda bold olan yerin formatı 100,1223 şeklinde görünüyor Bunu 100,1 olarak görünmesine ihtiyacım var. Excel sahifemdeki hücre biçimi etkilemiyor. Forumdan sayı format örnekleri ile revize etmeye çalıştım hata veriyor. Teşekkür ederim. Private Sub TextBox2_Change()...

Merhabalar, Aşağıdaki kodu sitemizden alıp kendime uyarlamaya çalışıyorum.takıldığım nokta Dizi(2, Say) = Veri sutunundaki verileri "başlayan harf" özellikli olarak süzüp lıstboxa getiriyor. İsteğim ; Örnek olarak "hasan hüseyin güzel" adında bir isim olsun. Ben "güzel" yazdığımdada veriyi...

Merhabalar, Çalışmam ile ilgili 2 sorum var. 1 ncisi Aşağıdaki kod çalıştığında Çalışma sayfamda tarih :15/11/2012 Textbox a girdiğim dğer : 15/11/2012 Lıstbox da :11/15/2012 olarak gözüküyor. 2 ncisi Userfor açıldığında sayfadaki sutun verileri aynen olduğu gibi görülüyor...

Merhaba arkadaşlar aşağıdaki kodda bir düzenleme yapmak gerekiyor yardımınızı rica ediyorum. Şuan bu kodun işlevi listbox1 deki (isim soyisim) değeri A4:g65536 aralığında arayarak aynı olanları listbox2 ye süzme işlemi yapıyor.Benim istediğim ise form üzerinde yer alan 2 adet dtpicker1 ve...

Merhaba arkadaşlar . Aşağıdaki kodlarla iki tarih arası süzme işlemi yapıyorum. Private Sub CommandButton12_Click() If IsDate(TextBox16.Value) = False Then MsgBox "RAPOR BAŞLANGIÇ TARİHİNİ GİRMEDİNİZ !!!", vbInformation: Exit Sub If IsDate(TextBox17.Value) = False Then...

Merhaba arkadaşlar. Aşağıdaki kodlarımla listbox üzerinde arama yapıyorum. Normalde 23.05.2012 formatında kaydedilen ve listboxta böyle görülen format. Arama yaparak veriler süzüldükten sonra 5/23/2012 şeklinde görüntüleniyor. Buraya kadar bir problem yok. Ama süzülen veri üzerinde düzeltme...