Açılan Kutudan Kritere Göre Veriyi Başka Alana Yazdırma
#1
mrb 
Satış formu  alt formu alanında  mlz kodunu seçtiğimde bazı yerlere otomatik atıyor sorun yok. istediğim 

cari durumu . müşteri ise mlz kodunda bulunan satış fiyatını    satış fiyatı alanına     eğer cari durumu bayi ise  mlz kodunda bulunan alış fiyatını satış fiyatı alanına yazması yazması.


Eklenti Dosyaları
.rar   deneme.rar (Boyut: 93,74 KB / İndirilme: 36)



  Alıntı
Bu mesajı beğenenler:
#2
Visual Basic
  1. If Me.Parent.caridurumu = "MÜŞTERİ" Then
  2. Me.alis_fiyat = Me.malzeme_kodu.Column(3)
  3. ElseIf Me.Parent.caridurumu = "BAYİ" Then
  4. Me.satis_fiyat = Me.malzeme_kodu.Column(4)
  5. Else
  6. Me.alis_fiyat = 0
  7. Me.satis_fiyat = 0
  8. End If



yapılabilir.

Uygulama dosyanızın kurgusu, Excel mantığı ile tasarlanmış gözüküyor. Access düşey tablo yapıları ile daha uygun çalışır. Projenizi daha sonraki aşamalarda sorun çıkarmaması için senaryosunu yeniden değerlendirebilirsiniz.



  Alıntı
Bu mesajı beğenenler:
#3
(22-11-2025, 00:32)dsezgin demiş ki:
Visual Basic
  1. If Me.Parent.caridurumu = "MÜŞTERİ" Then
  2.    Me.alis_fiyat = Me.malzeme_kodu.Column(3)
  3. ElseIf Me.Parent.caridurumu = "BAYİ" Then
  4.    Me.satis_fiyat = Me.malzeme_kodu.Column(4)
  5. Else
  6.    Me.alis_fiyat = 0
  7.    Me.satis_fiyat = 0
  8. End If



yapılabilir.

Uygulama dosyanızın kurgusu, Excel mantığı ile tasarlanmış gözüküyor. Access düşey tablo yapıları ile daha uygun çalışır. Projenizi daha sonraki aşamalarda sorun çıkarmaması için senaryosunu yeniden değerlendirebilirsin
hocam bu kodu malzeme alanı güncelleştirme sonrasınamı ekleyecem . orda diğer kodlar var nasıl ekleyecem bu şekilde eklersem malzeme kodu alanından seçim yapamıyorum. örneğe ekleme şansınız varsa çok iyi olur yapılmış bi çalışmada olayı daha iyi anlıyorum



  Alıntı
Bu mesajı beğenenler:
#4
(22-11-2025, 19:22)osman06 demiş ki: hocam bu kodu malzeme alanı güncelleştirme sonrasınamı ekleyecem . orda diğer kodlar var nasıl ekleyecem bu şekilde eklersem malzeme kodu alanından seçim yapamıyorum. örneğe ekleme şansınız varsa çok iyi olur yapılmış bi çalışmada olayı daha iyi anlıyorum

Alt form ALAN özelliklerden kilitlemiş olduğundan seçim yapılamaz. malzeme_kodu alan güncelleme olay yordamı prosedürün en son satırın bir üstüne taşıyabilirsiniz.



  Alıntı
Bu mesajı beğenenler:
#5
(22-11-2025, 22:37)dsezgin demiş ki:
(22-11-2025, 19:22)osman06 demiş ki: hocam bu kodu malzeme alanı güncelleştirme sonrasınamı ekleyecem . orda diğer kodlar var nasıl ekleyecem bu şekilde eklersem malzeme kodu alanından seçim yapamıyorum. örneğe ekleme şansınız varsa çok iyi olur yapılmış bi çalışmada olayı daha iyi anlıyorum

Alt form ALAN özelliklerden kilitlemiş olduğundan seçim yapılamaz. malzeme_kodu alan güncelleme olay yordamı prosedürün en son satırın bir üstüne taşıyabilirsiniz.

hocam malzeme kodunun güncelleştirme sonrasına alttaki gibi yaptım ama çalışmadı . hatta benim koddaki alış_fiyat ve satış fiyatı sildim denedim yine olmadı

Private Sub malzeme_kodu_AfterUpdate()

Me![malzeme_adi] = Me![malzeme_kodu].Column(1)
Me![birimi] = Me![malzeme_kodu].Column(2)
Me![alis_fiyat] = Me![malzeme_kodu].Column(3)
Me![miktar] = Me![malzeme_kodu].Column(5)
Me![yakitgiderii] = Me![malzeme_kodu].Column(6)
Me![iscilikk] = Me![malzeme_kodu].Column(7)
Me![genelgiderr] = Me![malzeme_kodu].Column(8)
Me![satis_fiyat] = Me![malzeme_kodu].Column(4)
Me![maliyet] = Me![malzeme_kodu].Column(10)
Me![tkonu] = Me![malzeme_kodu].Column(9)
Me![serisi] = Me![malzeme_kodu].Column(11)

If Me.Parent.caridurumu = "MÜŞTERİ" Then
    Me.alis_fiyat = Me.malzeme_kodu.Column(3)
ElseIf Me.Parent.caridurumu = "BAYİ" Then
    Me.satis_fiyat = Me.malzeme_kodu.Column(4)
Else
    Me.alis_fiyat = 0
    Me.satis_fiyat = 0
End If
End Sub



  Alıntı
Bu mesajı beğenenler:
#6
(22-11-2025, 23:26)osman06 demiş ki: hocam malzeme kodunun güncelleştirme sonrasına alttaki gibi yaptım ama çalışmadı

alt form malzeme kodunu değiştirebildiniz mi? örneğinizde deneme yaptığımda güncelleme sağlandı.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Bir Formdan Başka Bir Formdaki Butonun Click Olayını Aktif Etmek M_Kemal_Askeri 2 346 09-06-2026, 18:39
Son Mesaj: M_Kemal_Askeri
  [FORM] Kritere Bağlı Olarak Değerlerin Toplanması M_Kemal_Askeri 2 297 10-04-2026, 01:05
Son Mesaj: M_Kemal_Askeri
  [FORM] Açılır Menüdeki Veriyi Metin Kutusuna Aktarma Pasham 1 426 19-02-2026, 21:18
Son Mesaj: adnan
  Yataydaki Veriyi Dikeye çevirmek sevincili 1 429 04-04-2025, 07:22
Son Mesaj: dsezgin
access-sql-20 [TABLO] Liste Kutusu-çoklu Seçim özellikli Alana Excelden Verileri Yapıştırma mkoblayek 18 1.689 18-02-2025, 08:49
Son Mesaj: mkoblayek
access-sql-9 [SORGU] Tabloda Geçen Iki Alanda Ortak Kelime Var Ise Istenilen Alana Işaret Koymak sevincili 5 625 20-09-2024, 01:09
Son Mesaj: dsezgin
  Acceste Liste Kutusundan Seçilen Veriyi Metin Kutusuna Gönderme Pasham 24 2.222 04-04-2024, 01:18
Son Mesaj: halily
  [FORM] Aktif Saati Tablodaki Saat Arasına Göre Bulup Forma Yazdırma yahyamacit 5 767 14-03-2024, 11:07
Son Mesaj: yahyamacit

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi