AccessTr.neT

Tam Versiyon: Excel Vba Permission Denied Hatası Hakkında
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4 5 6
Güncelleme sorunu çözülmüştür hocam Taşıyabiliriz.
Berduş hocam örneğiniz de Firma Unvanı comboboxında Firma adı textboxının bilgileri geliyor. Dolayısıyla combobox_Firma Ünvanı nın change yordamına yazdığım ve seçilen firmanın bilgilerini form üzerine aldığım kod çalışmıyor. Bu durumu nasıl düzeltebilirim.

[Resim: do.php?img=10931]
(20/04/2021, 12:54)berduş yazdı: [ -> ]1. nolu mesajda yer alan örnekte halâ  ComboBox_FirmaUnvani açılır kutusunun rowSource'u anasayfaya bağlı siz rowsource'u silmemişsiniz ki!
Berduş hocam örneğiniz de Firma Unvanı comboboxında Firma adı textboxının bilgileri geliyor. Dolayısıyla combobox_Firma Ünvanı nın change yordamına yazdığım ve seçilen firmanın bilgilerini form üzerine aldığım kod çalışmıyor. Bu durumu nasıl düzeltebilirim.
[Resim: do.php?img=10932]
(20/04/2021, 13:51)feraz yazdı: [ -> ]
(20/04/2021, 12:01)berduş yazdı: [ -> ]
If sonTabloSatr > 1 Then ComboBox_FirmaUnvani.List = .Range("C2:C" & sonTabloSatr).Value
bu satırda hocam
ComboBox_FirmaUnvani veriyi almıyor

List ile alındığında belki tek sayır varsa ondan hata yapıyordur aklımdaydı unuttum.Alttaki kodu eklediğinz kodun üstiüne ekleyindeneyemedim .Ve rowsourceyi silin başka konuda yazdığım.
Ve >1 yerine >2 yazıp deneyin abey.Mobilden bukadar oldu.

If sonTabloSatr = 2 Then ComboBox_FirmaUnvani.additem .Range("C2").Value
End if


Anlatmak istediğinizi anlayamadım Feraz Hocam.
(20/04/2021, 15:11)Oğuz Türkyılmaz yazdı: [ -> ]
(20/04/2021, 13:51)feraz yazdı: [ -> ]
(20/04/2021, 12:01)berduş yazdı: [ -> ]
If sonTabloSatr > 1 Then ComboBox_FirmaUnvani.List = .Range("C2:C" & sonTabloSatr).Value
bu satırda hocam
ComboBox_FirmaUnvani veriyi almıyor

List ile alındığında belki tek sayır varsa ondan hata yapıyordur aklımdaydı unuttum.Alttaki kodu eklediğinz kodun üstiüne ekleyindeneyemedim .Ve rowsourceyi silin başka konuda yazdığım.
Ve >1 yerine >2 yazıp deneyin abey.Mobilden bukadar oldu.

If sonTabloSatr = 2 Then ComboBox_FirmaUnvani.additem .Range("C2").Value
End if


Anlatmak istediğinizi anlayamadım Feraz Hocam.
Akşama bakarım abey çözülmezse.
(20/04/2021, 14:52)Oğuz Türkyılmaz yazdı: [ -> ]
(20/04/2021, 12:54)berduş yazdı: [ -> ]1. nolu mesajda yer alan örnekte halâ  ComboBox_FirmaUnvani açılır kutusunun rowSource'u anasayfaya bağlı siz rowsource'u silmemişsiniz ki!
Berduş hocam örneğiniz de Firma Unvanı comboboxında Firma adı textboxının bilgileri geliyor. Dolayısıyla combobox_Firma Ünvanı nın change yordamına yazdığım ve seçilen firmanın bilgilerini form üzerine aldığım kod çalışmıyor. Bu durumu nasıl düzeltebilirim.
[Resim: do.php?img=10932]
sütun sayısını 3 yapıp ilk 2sinin genişliğini 0 olarak ayarlamayı dener misiniz?
ben verileri B sütundan alıyormuş gibi düşünmüşüm
Sayfalar: 1 2 3 4 5 6