• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Para Formatında Kuruş Sorunu

ahmed_ummu

Altın Üye
Katılım
28 Mart 2011
Mesajlar
777
Excel Vers. ve Dili
Excel 2010 Professional Plus 64 Bit
Merhaba arkadaşlar.

Aşağıdaki kod ile işlemin sonucu 486,10. Excel sayfasına yazarken 486,1 yazıyo. Nasıl düzeltebilirim.

ActiveCell.Offset(0, 9).Value = WorksheetFunction.Round(ActiveCell.Offset(0, 8).Value * sgkd, 2)


Aşağıdaki kod ile de 486,10 yazıyo ama bu kez de sayı olarak görmüyor ve toplama yapmıyor. Yardımcı olursanız sevinirim.

ActiveCell.Offset(0, 9).Value =Format(ActiveCell.Offset(0, 8).Value * sgkd, "#,##0.00")
 
Aşağıdaki gibi deneyin.

Kod:
ActiveCell.Offset(0, 9).Value = formatnumber(ActiveCell.Offset(0, 8).Value * sgkd, 2)
 
Deneyiniz.
Kod:
ActiveCell.Offset(0, 9).Value = ActiveCell.Offset(0, 8).Value * sgkd
activecell.offset(0,9).numberformat="#,##0.00"
 
bu sayı ile 486,10
bu sayı aynı 486,1

ActiveCell.Offset(0, 9).Value = WorksheetFunction.Round(ActiveCell.Offset(0, 8).Value * sgkd, 2)

yukarıdaki bölüm için
hücreleri biçimlendir den sayı/ondalık basamağı iki olaralk seçin
 
Cevaplar için teşekkürler arkadaşlar.
 
bu sayı ile 486,10
bu sayı aynı 486,1

ActiveCell.Offset(0, 9).Value = WorksheetFunction.Round(ActiveCell.Offset(0, 8).Value * sgkd, 2)

yukarıdaki bölüm için
hücreleri biçimlendir den sayı/ondalık basamağı iki olaralk seçin

Malmüdürlüğü kabul etmiyor 486,1'u
 
Geri
Üst