Sayın Hocalarım ;
ALDIGI_AVANS: Nz(DLookUp("[ToplaTUTARI]";"srg_AVANS_TOPLA";"[PERS_NO]=" & [PERS_NO]);0) sorguda kullandığım bu komutta format örneğin 1550 çıkıyor ben 1.500,00 vermesini istiyorum ama bu komutta nasıl yapılacağını bilemedim çok örneklere bakmama rağmen bulamadım.
Saygılarımla,
Ahmet Yenginoğlu
(10/07/2015, 08:36)yenginoglu yazdı: [ -> ]Sayın Hocalarım ;
ALDIGI_AVANS: Nz(DLookUp("[ToplaTUTARI]";"srg_AVANS_TOPLA";"[PERS_NO]=" & [PERS_NO]);0) sorguda kullandığım bu komutta format örneğin 1550 çıkıyor ben 1.500,00 vermesini istiyorum ama bu komutta nasıl yapılacağını bilemedim çok örneklere bakmama rağmen bulamadım.
Saygılarımla,
Ahmet Yenginoğlu
Ahmet Bey,
Örnek dosya eklememişsiniz.
İnternette bulduğum bir kaç örnek var. Belki işinize yarar.
Kod:
Format (210.6, "#,##0.00")
Result: '210.60'
Format (210.6, "Standard")
Result: '210.60'
Format (0.981, "Percent")
Result: '98.10%'
Format (1267.5, "Currency")
Result: '$1,267.50'
Bu kodların sorguda nasıl kullanıldığının örneği alttaki resimdeki gibidir.
Arkadaşın ilgin için çok teşekkür ederim. Ben format komutunu
NZ ve
Dlookup komutları olduğu için nereye yazacağımı bilemedim.
Teşekkürler,
Örnek dosyanız olmadığı için daha fazla yardımcı olamayacağım...
Bu komutta format komutunu nerede kullanacağım için örneğe gerek olmadığını düşünüyorum.
Teşekkürler.
Sayın yenginoglu,
talebinizde iki husus söz konusu.birincisi,format halinde yazımı;bir diğeri de,1550 değerini 1500 değerine getirmek için aşağı yuvarlama.
talebiniz için,bu hususlar nezdinde örnek kullanım olması adına,aşağıdaki kod ifadesini kullanmayı deneyebilirsiniz.
öncelikle,
aşağıdaki kodları,uygulamada bir MODÜL oluşturup içerisine ekleyip kaydediniz.
Kod:
Function RoundDown(dVal As Double, Decimals As Integer) As Double
Dim Factor As Double, fVal As Double
Dim iVal As Integer
Factor = Exp(Log(10) * Decimals)
fVal = dVal * Factor
iVal = Int(fVal)
RoundDown = iVal / Factor
End Function
ÖRNEK KOD KALIBI:
(NOT:sorgu satırında kullanım için)
Kod:
Deneme:Format(rounddown(1550;-2);"#,00")
sizin kod ifadenize yönelik uyarlanacak olunduğunda;
Kod:
ALDIGI_AVANS:Format(rounddown(Nz(DLookUp("[ToplaTUTARI]";"srg_AVANS_TOPLA";"[PERS_NO]=" & [PERS_NO]);0);-2);"#,00")
Elbette ki,eğer bu paylaşım yeterli olmazsa;katılımcıların daha verimli paylaşımda bulunabilmesi için,sayın Allback bey’in de bahsini yaptığı üzere,örnek uygulamanızı eklemeniz durumunda,sonuçları görebilmek ve inceleyebilmek için,örnek uygulamanızı eklemeniz daha yerinde olacaktır.
EK'te;
bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.bilginize...İyi çalışmalar,saygılar.