Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
24/10/2017 10:21
Konu Sahibi
53rize
Yorumlar
4
Okunma
577
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
53rize

53rize

Aktif Üye

Additional groups:
Üye
19555
Ad.... Ço....
 54
 43
 163
 08/05/2010
0
 Rize
 
 Ofis 2007
 26/12/2018,11:07
Çözüldü 
Formda, Gelir_adı Açılan Kutudan Veri Seçtiğimde ve metin kutusuna da değer girdiğimde, Açılan kutuda girdiğim veri Gelir tablosundan o verinin yanında bulunan sutunun (Glr_yüzde) yüzde oranını kadar, Ana tablodaki GM_kln_brc sütününa ve sube_bky aktarsın.

Örneğin; Gelir adı B, Gelir miktarı 3000 tl. olsun, Gelirler tablosunda bu verinin karşısındaki oran %40 olduğundan, 3000 tl  % 40 ı GM_kln_brc sütununa ve geriye kalan %60 da sube_bky sütununa nasıl yazdırabiliriz. Teşekkür ederim.


53rize, 08-05-2010 tarihinden beri AccessTr.neT üyesidir.

ozanakkaya

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 483
 12.101
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
Merhaba,

Gelir_toplam metin kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu ekleyiniz.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim GVerim, GKalan As Integer

If IsNull(Me.Açılan_Kutu31) Then

    MsgBox ("Gelir Adını Seçiniz")
    Me.Açılan_Kutu31.SetFocus

Else

    GVerim = DLookup("[Glr_Yüzde]", "Gelirler", "[Gelir_adı]='" & [Açılan_Kutu31] & "'")
    GKalan = 100 - GVerim

    GM_kln_brc = (Me.Gelir_toplam * GVerim) / 100
    Sube_bky = (Me.Gelir_toplam * GKalan) / 100

End If


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

...........
53rize

53rize

Aktif Üye

Additional groups:
Üye
19555
Ad.... Ço....
 54
 43
 163
 08/05/2010
0
 Rize
 
 Ofis 2007
 26/12/2018,11:07
Çok teşekkür ederim istediğim gibi oldu fakat Rakam girdiğimde yüzdelik dağıtımları yapıyor. diyelimki rakam aynı olup gelir cinsini değiştiğimdede  güncellesin. Burada ise rakama tekrar müdahale ediyorum güncellemeyi yapıyor.


53rize, 08-05-2010 tarihinden beri AccessTr.neT üyesidir.

ozanakkaya

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 483
 12.101
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
(24/10/2017 11:28)53rize Adlı Kullanıcıdan Alıntı: Çok teşekkür ederim istediğim gibi oldu fakat Rakam girdiğimde yüzdelik dağıtımları yapıyor. diyelimki rakam aynı olup gelir cinsini değiştiğimdede  güncellesin. Burada ise rakama tekrar müdahale ediyorum güncellemeyi yapıyor.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim GVerim, GKalan As Integer

If IsNull(Me.Açılan_Kutu31) Then

    MsgBox ("Gelir Adını Seçiniz")
    Me.Açılan_Kutu31.SetFocus

Else

    GVerim = DLookup("[Glr_Yüzde]", "Gelirler", "[Gelir_adı]='" & [Açılan_Kutu31] & "'")
    GKalan = 100 - GVerim

    GM_kln_brc = (Me.Gelir_toplam * GVerim) / 100
    Sube_bky = (Me.Gelir_toplam * GKalan) / 100

End If


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

...........
53rize

53rize

Aktif Üye

Additional groups:
Üye
19555
Ad.... Ço....
 54
 43
 163
 08/05/2010
0
 Rize
 
 Ofis 2007
 26/12/2018,11:07
sayın ozanakkaya; tamamdır teşekkür ederim


53rize, 08-05-2010 tarihinden beri AccessTr.neT üyesidir.


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Toplu Veri Girişi Yunus Bozkurt 9 298 07/06/2019, 14:22
Son Yorum: halily
Çözüldü İlişkilendirilmiş Formlardan Veri Çekmek, İlişkilendirmeyi Çoğaltmak sabotaj06 2 187 28/05/2019, 15:39
Son Yorum: sabotaj06
Çözüldü Formda Açılır Kurularda 3101 Hatası Veriyor haziran4 11 198 24/05/2019, 16:22
Son Yorum: haziran4
Çözüldü Açılan Kutuda Verilerin Görünmesi m_demir 7 229 15/05/2019, 23:27
Son Yorum: halily
Çözüldü Veri Girişi Formu Nasıl Olmalı? icemeno 6 274 11/05/2019, 23:50
Son Yorum: icemeno

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.