Excel toplam almıyor

[Baggwell]

Merhaba

Bir programdan indirdiğim raporda sayıların toplamını almak istiyorum fakat, rapor indiği zaman sayıların sonunda bir boşluk geliyor...

Kırpma formülünü, sayıya çevirmeyi denedim ama olmadı

Bu yüzden toplam alamıyorum çözümü nedir acaba ?

 

[Ömer BARAN]

Merhaba.

=TOPLA(0+YERİNEKOY(E2:E10;"[B][COLOR="Red"]*[/COLOR][/B]";""))
[COLOR="Blue"]Dizi Formülü şeklinde tamamlayınız.[/COLOR]

şeklinde sonuç alınabiliyor.

Not: Formüldeki * karakteri yerine bir hücredeki sonda olan boş karakteri kopyalayıp yapıştırarak kullanınız.

 

[Ömer BARAN]

Ya da formülü (dizi)

=TOPLA(0+YERİNEKOY(E2:E10;SAĞDAN(E2;1);""))

şeklinde değiştiriniz.

 

[Merhum İdris SERDAR]

.

Alternatif:

Diz formülü

=TOPLA(--YERİNEKOY(E2:E10;DAMGA(160);""))

.

 

[Baggwell]

Makro çözümü varsa benim için daha kolay olur,

Seçili sütuna bu formülü uygulasın ve sayıya dönüştürsün

mümkünse

 

[Korhan Ayhan]

Alan seçip aşağıdaki kodu çalıştırın.

Sub DEĞERE_ÇEVİR()
    For Each Veri In Selection
        If IsNumeric(Veri.Text) Then
            Veri.Value = CDbl(Replace(Veri.Text, Chr(160), ""))
        End If
    Next
End Sub

Ya da;

Sub DEĞERE_ÇEVİR()
    For Each Veri In Selection
        If IsNumeric(Veri.Text) Then
            Veri.Value = CDbl(Trim(Veri.Text))
        End If
    Next
End Sub

 

[Baggwell]

Makro çalışıyor,

sağ tuşa ekleyince hata veriyor neden olabilir ?

http://prntscr.com/6sdff5

 

[Korhan Ayhan]

Dim Veri As Range tanımlamasını ekleyip öyle deneyin.

 

[Baggwell]

Çok teşekkür ederim