title image


Smiley Re: VBA Summewenn in einer Spalte minus 3 Zeilen
Hallo,

zB mit einer UDF:







Function SummeFuerSuchbegriff(Suchbereich As Range, c As String) As Double



     Dim Zelle As Range



     SummeFuerSuchbegriff = 0

     For Each Zelle In Suchbereich

         If Zelle.Row > 3 Then

            If Zelle.Value = c And IsNumeric(Zelle.Offset(-3, 0)) Then

               SummeFuerSuchbegriff = SummeFuerSuchbegriff + Zelle.Offset(-3, 0).Value

            End If

         End If

     Next Zelle



End Function





Code eingefügt mit Syntaxhighlighter 4.0




Gruß Worti <img src="http://media2.giga.de/2015/06/snapchat-smiley-sonnenbrille.png">



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: