Excel Vba Permission Denied Hatası Hakkında

1 2 3 4 5 6
20/04/2021, 14:18

Oğuz Türkyılmaz

Güncelleme sorunu çözülmüştür hocam Taşıyabiliriz.
20/04/2021, 14:45

Oğuz Türkyılmaz

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.


20/04/2021, 14:52

Oğuz Türkyılmaz

(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.

20/04/2021, 15:11

Oğuz Türkyılmaz

(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:28

feraz

(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, 16:31

berduş

(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.

ben verileri B sütundan alıyormuş gibi düşünmüşüm
1 2 3 4 5 6