Live-Forum - Die aktuellen Beiträge
Datum
Titel
05.10.2025 11:43:19
Bed. Format. Spezialfall, Möglich, die Registerfarbe nutzen?
04.10.2025 18:18:42
Anzahl in einer Zelle automatisch ermitteln
04.10.2025 17:44:54
Power Query - Filtern einer Spalte mittels einer Liste
04.10.2025 15:35:03
Range um eine Einzelzelle erweiternerweitern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
412to416
412to416
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

vba -problem mit summewenn-

Forumthread: vba -problem mit summewenn-

vba -problem mit summewenn-
Maria.M
hallo zusammen,
ich möchte aus einer geöffneten Excel-Datei in der Spalte D nach einem vorkommenden Wort suchen und die zugehöhrigen Werte in Spalte F aufsummieren. Diesen Wert würde ich gerne einer Variabel zuweisen, damit ich diesen im späteren Programmcode auch noch anderen Zellen in anderen Excel-Dateien zuordnen kann.
Leider bekomme ich es nicht hin, die summewenn(sumif) Funktion einer Variable zuzuweisen.
Weiss jemand eine Lösung?
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: vba -problem mit summewenn-
Boris
Hi Maria,
Option Explicit

Sub summewenn()
Dim Crit As Variant 'Variable für das Suchkriterium
Crit = "b"
MsgBox Application.SumIf(Range("D:D"), Crit, Range("F:F"))
End Sub

Grüße Boris
AW: vba -problem mit summewenn-
maria
hallo boris,
danke für deine schnelle Antwort. nur hatte ich mir das bei der Formel folgendermaßen gedacht.
geamt_pt = SumIf(Range("D:D"), Crit, Range("F:F"))
bekomme allerdings bei allen versuchen die ich schon unternommen habe Fehlermeldungen!
Maria
Anzeige
Hä? Ich versteh dich leider nicht...
Boris
Hi Maria,
"...geamt_pt = SumIf(Range("D:D"), Crit, Range("F:F"))..."

Sub Maria
Dim geamt_pt As Double, Crit As Variant
Crit = "b"
geamt_pt = Application.SumIf(Range("D:D"), Crit, Range("F:F"))
End Sub

Was funktioniert daran nicht?
Grüße Boris
Anzeige
AW: Hä? Ich versteh dich leider nicht...
maria
ja genau so wollte ich es haben.
hatte das mit application msgbox nicht ganz verstanden.
dank dir boris
gruss
maria
AW: vba -problem mit summewenn-
barni
hi maria
Public 

Sub summif()
Dim l As Double
l = WorksheetFunction.SumIf(...)
End Sub

jetzt müsste l deine variable sein.
Anzeige
AW: vba -problem mit summewenn-
maria
ja das war es ! jetzt klappt es!
wenn ich mir die Lösungen so anschaue, muss ich festellen, dass ich
es fast selbst gelöst hatte. aber eben nur fast!!!!
danke nochmal
AW: vba -problem mit summewenn-
ypsilon
hi Maria,
so in etwa ?

Sub Makro()
Dim intVariable As Integer
intVariable = Parent.SumIf(Range("D1:D10"), "Text", Range("F1:F10"))
End Sub

cu Micha
Anzeige
;

Forumthreads zu verwandten Themen

VBA Code für Summewenn
olga

Hallo ich habe folgendes Problem.Wenn das Datum in der Spalte 2 und Lieferant in der Spalte 4 gleich sind, dann sollen die Beträge in der Spalte 6 zusammengezählt werden, Ergebnis soll in der Spalte 7 stehen.
Vielen DankOlga
13.06.2002 22:30:59
Thread-ID: 128564
5 Beiträge
VBA - Summe wenn
Markus Klement

Hallo zusammen,ich habe eine Tabelle, in die immer wieder neue Eingaben gemacht werden. Aus dieser Tabelle möchte ich nun Summen erhalten.Und zwar, wenn in Spalte A und B bestimmte Wörter stehen, soll er die Spalten E bis H summieren.Also, in A5 steht Belgien und in B5 Monntag, dann möchte ich...
21.06.2002 08:19:51
Thread-ID: 130347
4 Beiträge
VBA SummeWenn 2 Kriterien und mehrere Ergebnisse
Sebastian

Moin.
Ich habe folgendes Problem bei dem ich nicht weiter komme und per google auch nicht wirklich etwas finde.
Mein Tabellen Aufbau:
1. Tabelle "Waren Ausgang" : In dieser Tabelle werden alle meine Verbrauchten Artikel mit Datum und Projektnummer aufgelistet
Spalte 1 : Artikel...
23.10.2015 07:25:44
Thread-ID: 1453899
2 Beiträge
Anzeige
VBA Summewenn
joe

Hallo zusammen,
ich hab ein Tabellenblatt mit Stamm. Dort ist jede PErsonalnummer und wieviel er vom Artikel nach Hause genommen hat.
In das Tabellenblatt kopiere ich die Daten. Aber jetzt möchte ich das er wenn die Personalnummer und die Artikelnummer gleich sind, das es es zusammenzäh...
18.07.2017 18:21:43
Thread-ID: 1569887
2 Beiträge
VBA: Summewenn mit relativen Verweisen
Jean-Pierre

Hallo Zusammen,
Mit dem untenstehenden Code werden nach jedem unterschiedlichen Wert in Spalte A vier Zeilen eingefügt. Diese vier leeren Zeilen möchte ich nun aber noch weiterverarbeiten. Sub LeerzeilenEinfügen() Dim altNr As String Dim anzLZ As Long ' Anzahl der einzufügenden Leerze...
19.12.2018 23:52:59
Thread-ID: 1663918
7 Beiträge
VBA-Lösung für Zählen mittels SUMMEWENN
Volker

Guten Morgen,für folgendes Problem suche ich eine VBA-Lösung:Ich habe in einer Tabelle mehrere Spalten und möchte die Anzahl ermitteln, bei denen der Wert in Spalte A "310" und gleichzeitig der Wert in Spalte H "DEZ" ist.Ich suche also eine VBA-Lösung die {=SUMME(WENN((A2:A3500="310")*(H2:H3500...
08.11.2002 09:35:32
Thread-ID: 178620
3 Beiträge
VBA Syntax von Kombination summewenn und summe
Kombination

Guten Tag
Ich versuche mich, mittels VBA eine Formel mit den Funktionen summewenn und summe in eine Zelle einzutragen, leider bisher nicht erfolgreich.
.Cells(BW_Diff, 14).Formula = 'hier soll die Formel stehen
die ganze Formel würde bei direkter Eingabe in die Zelle wie folgt au...
07.12.2006 14:58:31
Thread-ID: 827237
3 Beiträge
VBA Summe / Wenn Formel
Thomas
Hallo zusammen,
ich habe eine Abrechnungsdatei, bei der einige Transporte aufgelistet sind und immer wieder welche dazukommen.
Es sollten nur die nötigsten Daten manuell eingegeben werden, wie z.B. das Transportdatum und die Filialnummer mit den zu beliefernden Palettenanzahl.
Der Trans...
19.09.2022 23:20:15
Thread-ID: 1899574
19 Beiträge
VBA Summewenn bringt Anwendungsfehler
der Bö
Moin zusammen,
ich möchte über VBA eine Summenformel in ein Tabellenblatt eintragen. Die Formel bezieht sich auf ein anderes Blatt und wenn ich die manuell eingebe, funktioniert
das auch. Aber per VBA bekomme ich "Anwendungs- oder objektorientierter Fehler".
Das Script sieht so aus (Ausz...
22.05.2024 17:36:58
Thread-ID: 1978900
23 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige