excelde hücre adreslerinin yazılı olduğu yer yok mu, yan tarafında aşağı yönlü bir üçgen var oraya basınca çıkıyor

(20/04/2021, 18:01)berduş yazdı: excelde hücre adreslerinin yazılı olduğu yer yok mu, yan tarafında aşağı yönlü bir üçgen var oraya basınca çıkıyor

Hocam isimlendirmenin yapıldığı yeri biliyorum orda da yok zaten ilk oraya baktım diyecektim ki ben tüm tabloyu seçip isimlendirme var mı diye bakmıştım oka basıp da kayıtlara bakmak aklıma gelmedi şimdi baktım sadece mevcut kayıtların olduğu alanı seçince isimlendirme Tablo1 diye çıkıyor ben tüm tablodur diye düşündüğümden o şekilde seçip isimlendirme varmı diye bakmıştım. Neyse bu konuda aklımda soru işareti kalmadı çok teşekkür ederim.

(20/04/2021, 12:31)berduş yazdı: RowSource=tablo1 yapılıp sütun sayısı 2ye çıkarılmıştır

Abey sütunu 2 ye çıkartmak sonradan sorun olabilr belki başka yerde kullanılırsa ve bence gerek yok sadece daha önce yazdığım kod yeterliydi bence

---

Mobilden okuyup hata mesajından anladığım kadryla array diyor yani tek stır verilik heralde.11.mesajda verdiğim kod normalde sorunu çözmesi gerekiyordu.

(20/04/2021, 19:02)feraz yazdı:

(20/04/2021, 12:31)berduş yazdı: RowSource=tablo1 yapılıp sütun sayısı 2ye çıkarılmıştır

Abey sütunu 2 ye çıkartmak sonradan sorun olabilr belki başka yerde kullanılırsa ve bence gerek yok sadece daha önce yazdığım kod yeterliydi bence

---

Mobilden okuyup hata mesajından anladığım kadryla array diyor yani tek stır verilik heralde.11.mesajda verdiğim kod normalde sorunu çözmesi gerekiyordu.

bu sizin yönteminizle ilgili değil hocam, bir öneride bulunmuştum onla ilgiliydi

Konu taşınabilir yardımlarınız için çok teşekkür ederim. Son halini de ekliyorum.

Abey son dosyanızı denedim öncedende dediğim gibi sadece 2.satır dolu ise hata verironun yerine alttaki kodu kullanın önceden yazdığım gibi.

        If sonTabloSatr = 2 Then

            ComboBox_FirmaUnvani.AddItem .Range("C2").Value

        ElseIf sonTabloSatr > 2 Then

            ComboBox_FirmaUnvani.List = .Range("C2:C" & sonTabloSatr).Value

        End If