bir hücredeki verileri toplama

[papatya35]

Merhaba
muhasebe programından excele doküm aldığımda bir hücreye o faturanın tüm satırlarını aktarım yapıyor ben manuel toplam alıyorum
Örneğin : 10.00 ad; 1200.15 kg, 350.01 kg gibi en az 10 15 satırlık faturalar çoğunluk kg ama adette oluyor.
metni sütünlara dönüştürle düşündüm fakat çok dağılıyor daha da zorlaştırdı işimi daha pratik bir yolu var mıdır
birde program kuruş hanesini , yerine . atıyor. excelde de programda da kuruş hanesini , tanımlı normalde.

 

[anemis]

Sorunuzu örnek dosyayla destekler misiniz rica etsem.

 

[papatya35]

Sorunuzu örnek dosyayla destekler misiniz rica etsem.

ekte gönderiyorum teşekkür ederim.

 

[anemis]

ekte gönderiyorum teşekkür ederim.

Ne yapmak istiyorsunuz burada? E stunundaki , leri . mı yapmak istiyorsunuz?

 

[papatya35]

Ne yapmak istiyorsunuz burada? E stunundaki , leri . mı yapmak istiyorsunuz?

e sütununu satır satır toplamak istiyorum.
310 ad.
335 AD.
ilgili satırları toplayıp yine E sütununa bu şekilde yazıyorum.

 

[Korhan Ayhan]

Örnek dosyayı inceleyiniz.

Kullanıcı tanımlı fonksiyon (makro) ile çözüm hazırlanmıştır.

=KTOPLA($E$2:$E$65;"AD.")

Kod;

Function KTOPLA(Alan As Range, Kriter As String)
    Dim Veri As Range, Dizi As Variant
    
    Application.Volatile True
    
    For Each Veri In Alan
        If Veri.Value <> "" Then
            Dizi = Split(Veri.Value, ",")
            For X = 0 To UBound(Dizi)
                If InStr(1, Dizi(X), Kriter) > 0 Then
                    KTOPLA = KTOPLA + CDbl(Replace(Replace(Dizi(X), Kriter, ""), ".", ","))
                End If
            Next
        End If
    Next
End Function

 

[NADİR YILDIZ]

Sayın korhan ayhan bey günaydın

papatya35 arkadaşımızın örneğinden yola çıkarak indirilecek kdv listesinde satırlardaki aynı mal cinslerini ve mal miktarlarını brimlerine göre ayırmak ve toplatmak istiyorum.ancak sizden ricam çözümü makro ile değil formül ile çözümlemeniz şimdiden teşekkür ederim

 

[papatya35]

merhaba çok teşekkür ederim Korhan Bey
Yalnız ben satır satır yapmak istiyorum.
önceki ayın manuel bitirdiğim dosya ektedir. E sütununun bu şekilde gözükmesini istiyorum.

 

[NADİR YILDIZ]

arkadaşlar 7 nolu mesajdaki sorum ile ilgili olarak yardımcı olabilecekmisiniz

 

[assenucler]

Bilgilendirme

Ayrı bir başlık altında soruyu sorarsanız, mutlaka size dönüş yapılır.

 

[NADİR YILDIZ]

teşekkürler ayrı bir başlıkta sorumu yeniledim

 

[papatya35]

Merhaba ben bu soruma tam yanıt alamadım. aynı soruyu tekrar sormama gerek var mı