Excel'de Metinle Sayıyı Toplama

[szuzum]

ARkadaşlar Şimdi Bende Toplama Programı Yaptım ama sayının için metinde yazmak istiyorum örnek a1 boya 25 tl kalem 10 tl telefon 50 tl bunları tek bir hücrede olmasını istiyorum

 

[sametozyavuz]

ARkadaşlar Şimdi Bende Toplama Programı Yaptım ama sayının için metinde yazmak istiyorum örnek a1 boya 25 tl kalem 10 tl telefon 50 tl bunları tek bir hücrede olmasını istiyorum

yapmak istediğiniz böyle birşey mi?
örnek dosya koyarsanız daha anlaşılır olur.

 

[szuzum]

Böyle olarak kardeş

 

[szuzum]

konu hala aktif arkadaşlar bekliyorum acilllll

 

[Korhan Ayhan]

Sonucu nasıl görmek istiyorsunuz?

Yani toplam olacak hücrede sadece parasal değerlerin toplamı mı olacak?

Ayrıca bu işlemin çözümü makro ile olabilir. Çünkü aynı hücre içine birden fazla sayısal değer girmişsiniz.

 

[nokmen]

Bir hücreye metin ve rakamı karışık yazdığın takdirde excelde işlem yapamazsın çünkü hücreleri metin olarak girmiş olursun. Yapman gereken, metinleri yani açıklamaları bir hücreye, karşılık gelen rakamları da ayrı bir hücreye yazmandır.

 

[szuzum]

neyse sağlık olsun yapamadım

 

[Korhan Ayhan]

Ben hazırladığım örnek dosyayı ekliyorum. İnceleyin. İstediğiniz gibi değilse düzenleme yaparız.

Kullandığım fonksiyon; (Boş bir modüle uygulayın)

Option Explicit

Function KTOPLA(Alan As Range)
    Dim Hucre As Range, Veri As Variant, X As Integer
    
    Application.Volatile True
    
    For Each Hucre In Alan
        Veri = Split(Hucre.Text, " ")
        For X = 0 To UBound(Veri)
            If IsNumeric(Veri(X)) Then
                KTOPLA = KTOPLA + CDbl(Veri(X))
            End If
        Next
    Next
End Function

 

[szuzum]

korhan bey çok tşkkr ederim işime yaradı