[VBA] Farklı para birimleri ile kayıt yapma

koruyucu · 23-01-2017, 23:03

İyi günler
Farklı para birimleri ile kayıt yapmak ile ilgili sorum olacak. biraz araştırma yaptım ama istediğim gibi bir çözüm bulamadım. eklediğim örnekte müşteri adı ve yaptığı teklifin yazacağı bir tablo ve veri girişi yapılacak olan basit bir form var. Sorma istediğim seçenek kutuları ile farklı para birim formatı ile kayıt yapmak mümkün müdür. TL'yi seçince TL kayıt, USD'yi seçince USD kayıt gibi.

dsezgin · 23-01-2017, 23:46

Table1 de PrBrm adinda sayi tipinde alan olusturun, diger bolumden acilan kutu deger listesi ayarlari ile satir kaynagina 1;"TL";2;"USD";3;"EUR" yazin ve sutun sayisi 2 olsun ve sutun genislikleri 0;1 yapin.
frm1 formunu tasarlayin en altta ki secenek adini ve denetim kaynagini PrBrm yapin.

Visual Basic
Sub ParaBirimiCevir()
Me.teklif.Format = IIf(Me.PrBrm = 1, "Currency", IIf(Me.PrBrm = 2, "#.00 $", "Euro"))
End Sub

koduna

Visual Basic
Private Sub Form_Current()
Call ParaBirimiCevir
End Sub
Private Sub PrBrm_AfterUpdate()
Call ParaBirimiCevir
End Sub
 
Private Sub teklif_AfterUpdate()
Me.PrBrm = 1
Call ParaBirimiCevir
End Sub

prosedurleri ile VBA bolumunde calistirabilirsiniz.

.zip

parabirimi.zip (Boyut: 32,37 KB / İndirilme: 144)

koruyucu · **Kayıt Tarihi:** 19.10.2016

Sayın Dsezgin ilginiz için teşekkür ederim. Anlattıklarınızdan yararlanarak formda düzenleme yaptım. Metin kutusunda farklı para birimi çıkıyor fakat kayıt edince tabloda hepsi TL gözüküyor. rica etsem örnek bir uygulama ek yapabilir misiniz.

EminA · 24-01-2017, 01:22

Sayın koruyucu, tablonuzun ilgili alanına giriş maskesi uygulamış olabilirsiniz. Eğer giriş maskesi varsa kaldırın. Sanırım düzelir. Kolay gelsin.

koruyucu · 24-01-2017, 16:41

"diger bolumden acilan kutu deger listesi ayarlari ile satir kaynagina 1;"TL";2;"USD";3;"EUR" yazin ve sutun sayisi 2 olsun ve sutun genislikleri 0;1 yapin."

Dsezgin yukardaki düzenlemeyi tablo için mi yoksa form için mi yapıyorum. Tabloda rakamları farklı para biriminden saklamayı beceremedim ufak bir örnek ek yaparsanız çok sevinirim.

dsezgin · 24-01-2017, 18:13

Mesaj 2'ye ornek VT'zi eklemistim, indirip inceleyiniz.

Benzer Konular...
Konu:		Yazar	Cevaplar:	Gösterim:	Son Mesaj
	Farklı Tablodan Mükerrer Olmayan Bilgi Almak	bilservisci	5	144	17-12-2023, 18:04 Son Mesaj: dsezgin
	[SORGU] Iki Tablo Arasında Sorgu Ile Güncelleme Yapma	yahyamacit	2	142	10-11-2023, 13:22 Son Mesaj: yahyamacit
	[SORGU] Farklı Tablolarda Yer Alan Satış Bilgilerini Toplama Sorgusu	Lidervet	1	144	09-11-2023, 00:54 Son Mesaj: dsezgin
	Tablo Verilerinin 2 Farklı Metotla Silinmesindeki Performans Farkı Hk.	adnnfrm	3	142	22-10-2023, 11:46 Son Mesaj: BeyTor
	Access Verilerini Google Studio Veya Farklı Dashboard çözümleri Ile Raporlama Hk.	adnnfrm	2	234	18-10-2023, 08:11 Son Mesaj: adnnfrm
	Iki Farklı Yazıcıya Iki Farklı Raporu Yazdırmak	adnnfrm	5	192	08-10-2023, 05:34 Son Mesaj: dsezgin
	[VBA] Kayıt Iptali: Kayıt Iptal Tablosuna Ekle, Kayıdı Sil Işlemi	programmer67	6	312	21-07-2023, 10:40 Son Mesaj: onur_can
	Altformda Hücre Ile Değil Satır Ile Işlem Yapma Hakkında.	OGUZTURKYILMAZ	1	161	22-04-2023, 23:48 Son Mesaj: OGUZTURKYILMAZ

Oturum Aç




Beni Hatırla Şifremi Unuttum?

Access SQL