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
Excel Vba Permission Denied Hatası Hakkında
(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ıyorHocam 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.
Access Çekirgesi
(20/04/2021, 12:31)berduş yazdı: RowSource=tablo1 yapılıp sütun sayısı 2ye çıkarılmıştırAbey 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ı:bu sizin yönteminizle ilgili değil hocam, bir öneride bulunmuştum onla ilgiliydi(20/04/2021, 12:31)berduş yazdı: RowSource=tablo1 yapılıp sütun sayısı 2ye çıkarılmıştırAbey 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.
Konu taşınabilir yardımlarınız için çok teşekkür ederim. Son halini de ekliyorum.
Access Çekirgesi
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
Konuyu Okuyanlar: 1 Ziyaretçi