Hesaplama Hk.

ahmed_ummu

Altın Üye
Katılım
28 Mart 2011
Mesajlar
731
Excel Vers. ve Dili
Excel 2010 Professional Plus 64 Bit
Altın Üyelik Bitiş Tarihi
15-10-2026
Merhaba arkadaşlar.

Aşağıdaki kodlarda toplama sonucu yanlış çıkıyor. Neden olabilir.

ActiveCell.Offset(0, 19).Value = WorksheetFunction.Round(ActiveCell.Offset(0, 18).Value * sgkd, 2) (Burası 0,19 sütunun hesaplanması)

ActiveCell.Offset(0, 25).Value = WorksheetFunction.Round(ActiveCell.Offset(0, 18).Value * sgkd, 2) (Burası 0,25 sütunun hesaplanması)



Alt toplamları alan kod.

For s1 = 4 To 34
sy.Cells(SonSatir + 2, 3).Value = "TOPLAM"
sy.Cells(SonSatir + 2, s1).Value = WorksheetFunction.Sum(sy.Range(sy.Cells(12, s1), sy.Cells(SonSatir + 2, s1)))
sy.Cells(SonSatir + 2, s1 + 16).NumberFormat = "#,##0.00"
sy.Cells(SonSatir + 2, 7).NumberFormat = "#,##0.00"
sy.Cells(SonSatir + 2, 11).NumberFormat = "#,##0.00"
sy.Cells(SonSatir + 2, 15).NumberFormat = "#,##0.00"
sy.Cells(SonSatir + 2, 19).NumberFormat = "#,##0.00"

Yardımcı olursanız çok sevinirim. En geç yarın teslim etmem lazım.
 

Ekli dosyalar

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,250
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Merhaba,

İlgili sütunlardaki küsüratları arttırıp kontrol edebilirsiniz.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,250
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Hücre biçimlendirmeden ondalık arttırıp hücreleri kontrol edebilirsiniz.
 
Üst