Combobox değeri veriye göre seçilsin, değiştirilemesin...

bybart

Altın Üye
Katılım
23 Ekim 2007
Mesajlar
21
Excel Vers. ve Dili
notebook:office 2016 işyerinde: office 365. hemen hemen tüm versiyonlar.
Altın Üyelik Bitiş Tarihi
12-03-2025
Ekran Görüntüsü (39).png
Merhabalar üstteki stok kayıt formundan ürün tanıtıyorum.

stoktanımlamahareketleri.jpg

üstteki şekilde ilk hareket giren adlı sekmeye kayıt oluyor.

Ekran Görüntüsü (40).png

Yapmak istediğim artık ttr kablo 2.5 mm ürünü seçildiğinde Birimi otomatik olarak Mt olarak seçilsin değiştirilemesin. Yani ürüne o birimi atamak ve birlikte kullanmak istiyorum.

Yardımcı olabilir misiniz?

İyi çalışmalar dilerim.
 

Cengizhantr06

Altın Üye
Katılım
16 Mayıs 2020
Mesajlar
301
Excel Vers. ve Dili
Office 365 Türkçe
Altın Üyelik Bitiş Tarihi
18-05-2025
çok benzer stok dosyam var aynısı dediğiniz gibi kodlarıda yazayım dosyayıda atayım uyarlayamazsanız örnek yükleyin yardımcı olayım
dediğinizin aynısı bende stok giriş çıkışta var
Dim Aranan As String
Dim Satir As Integer
Aranan = cbstokadi.Value
If Aranan = "" Then Exit Sub
On Error Resume Next
Satir = Worksheets("Stoklar").Range("C:C").Cells.Find(Aranan, Worksheets("Stoklar").Range("C65000"), xlFormulas, xlPart, xlByRows, xlNext, False, False).Row
TextBox12.Value = Worksheets("Stoklar").Range("B" & Satir)
 

Ekli dosyalar

Cengizhantr06

Altın Üye
Katılım
16 Mayıs 2020
Mesajlar
301
Excel Vers. ve Dili
Office 365 Türkçe
Altın Üyelik Bitiş Tarihi
18-05-2025
çok benzer stok dosyam var aynısı dediğiniz gibi kodlarıda yazayım dosyayıda atayım uyarlayamazsanız örnek yükleyin yardımcı olayım
dediğinizin aynısı bende stok giriş çıkışta var
Dim Aranan As String
Dim Satir As Integer
Aranan = cbstokadi.Value
If Aranan = "" Then Exit Sub
On Error Resume Next
Satir = Worksheets("Stoklar").Range("C:C").Cells.Find(Aranan, Worksheets("Stoklar").Range("C65000"), xlFormulas, xlPart, xlByRows, xlNext, False, False).Row
TextBox12.Value = Worksheets("Stoklar").Range("B" & Satir)
Bunu stok adı isimli comboboxım change olayına yazacak ve kendi sayfa adları combobox adını felan kendinize göre değiştireceksiniz
 

bybart

Altın Üye
Katılım
23 Ekim 2007
Mesajlar
21
Excel Vers. ve Dili
notebook:office 2016 işyerinde: office 365. hemen hemen tüm versiyonlar.
Altın Üyelik Bitiş Tarihi
12-03-2025
excel giriş şifresi: admin admin

Merhabalar
İlk denemem olduğu için örneğini tam oturtamadım. Sizin dosyanızla neredeyse aynı içerik fakat listwiev i çalıştıramadım. youtube eğitim sayfasından örnekleyerek ilerledim.

resim_2021-02-23_175155.png


Stok tanıtımında stok birimi seçildiğinde stok giriş formu ve stok çıkış formunda birim otomatik gelsin diye uğraşıyorum. listviewi çalıştırırsam sizin dosyadaki arama butonunu da deneyeceğim.

bu arada sizin dosya daha kapsamlı olmasına rağmen benimki neden 3 mb. nın üstünde anlamadım.
İyi çalışmalar...
 

Cengizhantr06

Altın Üye
Katılım
16 Mayıs 2020
Mesajlar
301
Excel Vers. ve Dili
Office 365 Türkçe
Altın Üyelik Bitiş Tarihi
18-05-2025
akşam bakalım halledelim inşallah bu arada costum olayı için gerekl dll dosyasını yükledim
 

bybart

Altın Üye
Katılım
23 Ekim 2007
Mesajlar
21
Excel Vers. ve Dili
notebook:office 2016 işyerinde: office 365. hemen hemen tüm versiyonlar.
Altın Üyelik Bitiş Tarihi
12-03-2025
ellerineze sağlık ama stok girişinde böyle bir hata olmuş bu işlemden sonra çıkıştaki ayarların aynısını yaptım fakat çalışmadı.

Stok çıkış formunda böyle bir problem olmamış...

giriş.jpg
 

Cengizhantr06

Altın Üye
Katılım
16 Mayıs 2020
Mesajlar
301
Excel Vers. ve Dili
Office 365 Türkçe
Altın Üyelik Bitiş Tarihi
18-05-2025
ellerineze sağlık ama stok girişinde böyle bir hata olmuş bu işlemden sonra çıkıştaki ayarların aynısını yaptım fakat çalışmadı.

Stok çıkış formunda böyle bir problem olmamış...

Ekli dosyayı görüntüle 225543
otomatik dolduğu için index boş görmüş düzelttim
 

bybart

Altın Üye
Katılım
23 Ekim 2007
Mesajlar
21
Excel Vers. ve Dili
notebook:office 2016 işyerinde: office 365. hemen hemen tüm versiyonlar.
Altın Üyelik Bitiş Tarihi
12-03-2025
Üst