VBA-Forum - Das Forum zu Microsoft VBA

Ansicht des Beitrags:

Von: Holger	Datum: 07.05.2008 14:37:10	Views: 649	Rating:	Antwort:
Thema: Aw:Syntaxfehler?
Hallo Anfänger, leider ergibt sich aus dem Code nicht, was du wirklich willst. Ich vermute, du willst, wenn in einer Zeile in Spalte I "Haus" steht und in Spalte C "Hund" die Werte dieser Zeile in Spalte CF addieren und die Summe in Zelle C5 ausgeben: Sub BedingteSummierung() Sheets("tabelle1").Activate For i = 1 To 10 If Cells(i, 9) = "Haus" And Cells(i, 3) = "Hund" Then Cells(5, 3) = Cells(5, 4) + Cells(i, 84) End If Next End Sub Gruß Holger Anfänger schrieb am 07.05.2008 11:02:03: Hallo, kann mir jemand bitte sagen wo hier der Syntaxfehler ist? Sub BedingteSummierung() Range("C5").Value = _ Application.WorksheetFunction.If Range("'Tabelle1'!I1:I60000") = "Haus" And Range("'Tabelle1'!C1:C60000") = "Hund" Then Sum Range("'Tabelle1'!CF1:CF60000") End If Next Es sollen in den beiden Spalten (I und C) Bedingungen erfüllt werden um die zugehörigen Werte in Spalte CF zu summieren. Danke im Voraus Christian

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen