Sıfır ile başlayan rakamları toplama almıyor. ?

[halis28]

Arkadaşlar,
Kendimce excellde işimi çok kolaylaştıracak ve birçok arkadaşlarıma da kolaylık sağlayacak bir doya hazırlamaya çalıştım. Nerdeyse sona geldim ama bir sorunum var.

Verileri aldığım resmi site 0 (SIFIR) ile başlayan rakamların arasına , (VİGÜL) yerine (NOKTA) işareti kullanmış. Bu nedenle bu rakamları toplama dahil etmiyor.
Sağolsun Korhan bey çok yardımcı oldu ve bir formül verdi ama sonuç doğru çıkmıyor. Dosya örneğim ekte yardımcı olursanız çok sevinirim. Bunu bu gece halletmem lazım arkadaşlar. Şimdiden yardımcı olacak arkadaşlara çok teşekkürler ediyorum.

Korhan bey son yazdığım yazıyı görseydi sanırım yine yardım ederdi ama sanırım görmedi.

 

[N.Ziya Hiçdurmaz]

yanıt

kod sayfa kod bölümünde olacak.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
Dim sat As Integer
    If Intersect(Target, [h7:h20]) Is Nothing Then Exit Sub
        For sat = 7 To 20
            If Left(Cells(sat, "h"), 1) = 0 Then
                Cells(sat, "h") = Split(Cells(sat, "h"), ".")(1)
            End If
        Next
End Sub

 

[halis28]

Niyazi Bey, İlginize teşekkür ederim. Sorunumu kısemnde olsa çözdüm. O Sıfırlar başta kalabilse iyiydi. O kodlar baştaki sıfırları ortadan kaldırdı. Bende Tablonun başlığındaki alan birimini "dekar" yerine m2 olarak değiştirdim. başka çözümü yok gibi zaten. Sağolun. Teşekkürler.

 

[Korhan Ayhan]

Selamlar,

Sorularınızı sorarken açık bir dille ifade ederseniz alacağınız cevaplarda bu yönde olacaktır. Siz bir önceki başlığınızda sıfır ile başlayan değerlerin 1000 ile çarpılacağını belirtmediğiniz için verdiğim cevap size göre yanlış sonuç üretti. Önermiş olduğum formülü aşağıdaki şekilde değiştirip denermisiniz.

Dizi formülüdür. CTRL+SHIFT+ENTER ile hücreye girişini tamamlayınız.

=TOPLA(EĞER(H7:H20="";0;EĞER(SOLDAN(H7:H20;1)="0";YERİNEKOY(H7:H20;".";",")*1000;YERİNEKOY(H7:H20;".";",")*1)))

 

[halis28]

Korhan bey, Çok Teşekkür ediyorum. Bu formül harika oldu. Allah razı olsun sizden Saolun.