Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
15.10.2025 13:31:47
WENN Formel mit zwei Bedingungen über 4 Spalten...
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
1580to1584
1580to1584
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bitte VBA-Formel ändern

Forumthread: Bitte VBA-Formel ändern

Bitte VBA-Formel ändern
26.09.2017 12:10:26
Lorenz
Hallo, Mahlzeit!
Wie müsste die Formel lauten, daß z. B. nur ein "o" (kleingeschrieben) gezählt wird.
mit:
Application.Evaluate("SUMPRODUCT(ISNUMBER(FIND(""o""," & strRef & "))*1)") wird auch Z.B. "Zoo", "Koos" "CMos" ect. als gefunden, berechnet".
Es soll also alleinig ein Zelleintrag mit klein "O" gezählt werden.
vielen Dank im voraus
Lorenz
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bitte VBA-Formel ändern
26.09.2017 12:18:12
Daniel
HI
naja, wenn du nur Zellen zählen willst, in denen genau "o" steht, dann tuts auch ein einfaches:
Sumproduct((""o""=" & strRef & ")*1)
oder noch einfacher CountIf(" & strRef & ",""o"")
das muss man dann auch nicht kompliziert mit Evaluate berechnen, sondern kann es direkt ausführen
Worksheetfunction.CountIf(Range(strRef), "o")
Gruß Daniel
Anzeige
AW: Bitte VBA-Formel ändern
26.09.2017 12:52:41
Lorenz
Hi Daniel
Danke f. die Tipps.
Evaluate hatte ich übernommen wo ich Probleme hatte aus (in UF) Probleme hatte!
mit:
Worksheetfunction.CountIf(Range(strRef), "o") hattest du vollkommen recht!!!
Funktioniert wunderbar.
Grüße Lorenz
AW: kleine Einschränkung
26.09.2017 13:46:15
Daniel
HI
aber beachte: das CountIf unterscheidet nicht zwischen Groß- und Kleinschreibung.
dh ein "O" wird genauso gezählt wie ein "o".
wenn das ein Problem ist müsstest du die Lösung von Rudi nehmen.
Excact/Identisch ist der Vergleich, welcher Groß/Kleinschreibung berücksichtigt.
Gruß Daniel
Anzeige
AW: kleine Einschränkung
26.09.2017 16:16:14
Lorenz
Hallo Daniel,
Genau, auf dies bin ich beim Probieren draufgekommen.
Vielen Dank für den weiteren Hinweis.
Grüße Lorenz
AW: Bitte VBA-Formel ändern
26.09.2017 12:20:03
Rudi
Hallo,
sumproduct(exact(" &strref &",""o"")*1)"
Gruß
Rudi
AW: Bitte VBA-Formel ändern
26.09.2017 12:56:09
Lorenz
Hallo Rudi
Danke für Tipp,
Funktioniert Einwandfrei
Aber wegen der "Kürze" hab ich Worksheetfunction.CountIf(Range(strRef), "o") verwendet
Grüße Lorenz
Anzeige
@ Rudi Bitte Erweiterung
26.09.2017 16:29:36
Lorenz
Hallo Rudi
Nochmals Danke für deinen Tipp.
Ist es unverschämt von mir um eine Erweiterung zu bitten?
Und zwar nach dem Motto:
If Len(Zelleintrag)=1 Then sumproduct(exact(" &strref &",""O"")*8)"
If Len(Zelleintrag)=2 Then sumproduct(exact(" &strref &",""OO"")*10)"
Ist dies möglich, weil ich schaff's nicht.
Grüße
Lorenz
Anzeige
unverschämt nicht, aber ...
26.09.2017 22:07:03
Rudi
Hallo,
... ich habe keine Ahnung, worauf du hinaus willst.
Gruß
Rudi
AW: unverschämt nicht, aber ...
27.09.2017 12:06:30
Lorenz
Hallo Rudi
Danke für die "Rück"Meldung, aber inzwischen (in der Nacht) lief der erstellte Code auf einmal richtig.Ich hatte zwei verschiedene Summengruppen erstellt. In die eine Gruppe wird ein Eintrag mit "I" mit hochgezählt. In die andere Gruppe wird ein Eintrag mit "II" hochgezählt. Anfänglich wurden in der einen Gruppe bei beiden Einträgen, nämlich der mit beiden Einträgen hochgezählt. In diesem Fall wollte ich vorher prüfen ob ein oder zwei Zeichen in der Zelle vorhanden sind, um dies zu differenzieren.
Es werden obendrein mit den verschiedenen Zeichen, jeweils andere Werte aufsummiert. z. B. I steht für 12, "II" aber für 8 usw.
Anzeige
;

Forumthreads zu verwandten Themen

"wenn, dann, sonst" - Frage
Oliver

Hallo,
kleines Problem,
=WENN($I$4=4;4;0) liefert mir den Wert "0"
Jetzt habe ich diese Formel folgendermaßen abgeändert:
=Wenn((Istfehler(A1);"";Wenn($I$=4;4;0))
... dies liefert mir wieder den Wert "0", obwohl Istfehler(A1) erfüllt wird -confused-
Nun meine Frage,...
11.09.2008 10:23:00
Thread-ID: 1008998
16 Beiträge
Anzeige
Command Button schützen vor VBA
Hüseyin

Hallo zusammen,
habe eine kurze Frage und hoffe ihr könnt mir weiterhelfen,
ich habe ein Exceldokument mit Commandbuttons drin. Wenn ich allerdings über VBA eine "Sortierung" oder "Komprimierung" über das Tabellenblatt laufen lasse, werden meine Buttons kleiner bzw. sehen gequetscht aus...
28.10.2008 11:21:33
Thread-ID: 1019856
3 Beiträge
Anzeige
Formel wenn dann sonst ...
Uwe

Hallo, Gemeinde ..
Mir stellt sich folgende Herausforderung:
ich möchte in einer Liste Fahrtkosten berechnen. Der Arbeiter bekommt von km 1 bis km 10 0,36€ pro km (einfach). ab dem 11 km bekommt der Arbeiter 0,40€.
Wie bekomme ich eine Formel hin, die das berechnet, wenn
- der A...
31.10.2008 11:20:00
Thread-ID: 1020821
10 Beiträge
wenn/dann/sonst???
m-andi

Hallo zusammen,
in VBA bin ich noch ein Depp,
ich bräuchte bitte eure Hilfe.... das Problem ist folgendes:
Ich habe in einem Feld (J24) entweder tags, nachts, immer oder nie stehen,
Bei Tags soll es in die Felder G29 und G45:G52 ein "ja" schreiben, in die Felder G30:G44 ein "ne...
15.11.2008 13:30:42
Thread-ID: 1024753
4 Beiträge
Formel wenn dann zellvergleich Text
Karel

Hallo Forum,
wie kann ich Zellwert C mit Zellwert E vergleichen ausgaben in Zelle A
wenn C und D Leer dsnn A auch Leer
Tabelle1

 ABCDE2Ausgabe Textwert Textwert3Offen Bezahlt Offen4Bezahlt Bezahlt Bezahlt5Offen Bezahlt  6Of...
28.11.2008 20:04:52
Thread-ID: 1028782
5 Beiträge
VBA, Notiz ein- und wieder ausblenden
Burghard

Hallo ins Netz,
ich möchte mit Knopfdruck ein Textfeld (mit Inhalt, es existiert schon) oder ein Autoformat (z.B. Gefaltete Ecke) auf dem Blatt an einer bestimmten Stelle für 1 Minute plazieren und danach soll es wieder verschwinden. Also kopieren und dann automatisch die Kopie wieder lösc...
01.12.2008 09:08:18
Thread-ID: 1029158
2 Beiträge
Andere Schreibweise für Formel in VBA
MAS

Einen wunderschönen guten Abend,
ich muss in einem Tabellenblatt einige Formeln per VBA erzeugen.
Mit Hilfe des Makrorecorders müsste ich diesen String erzeugen - die Formel ist allerdings nur recht schwer lesbar
Würde gerne schöne Zellbezeichnungen angeben - was muß ich denn dazu...
04.03.2009 16:56:56
Thread-ID: 1056514
5 Beiträge
VBA Code if or then nicht richtig
andreas

Hallo zusammen,
habe hier in einer Anwendung einen kleine Code bei dem wird der Systembenutzer abgefragt, das funktioniert. Jetzt soll folgendes passieren, wenn der Benutzer "Andreas" oder "martin2" ist, soll Spalte "f:G" eingeblendet sein, bei allen anderen Systembenutzern soll Spalte "F:G...
13.05.2009 11:25:25
Thread-ID: 1074763
9 Beiträge
VBA: abfragen, ob benannte Tabelle vorhanden ist
André

Moin zusammen,
wie kann ich per VBA abfragen, ob in einem Tabellenblatt bereits eine "benannte Tabelle" definiert ist?
Ich erstelle die Tabelle mit
Worksheets("Datensätze").ListObjects.Add(xlSrcRange, rg, , xlYes).Name = "Datenbereich"
Läuft das Makro dann ein weiteres mal, kom...
12.06.2009 14:18:00
Thread-ID: 1080995
2 Beiträge
Datum in andere Spalte mit and. Format VBA
Wolfgang

Hallo,
in Spalte F, ab Zeile 2 befinden sich Daten im Format "18.06.2009" - wäre denkbar, dass jeweils dieses Datum in Spalte R im Format "Juni 09" wiederholt/konvertiert wird? Die Anzahl der Zellen ist jeweils unbekannt, das Konvertieren würde ich gerne immer beim Start der Excel-Mappe vor...
18.06.2009 21:23:07
Thread-ID: 1082734
6 Beiträge
VBA - Formeln kopieren mit Bezug auf andere Sheets
Fabian

Hallo Zusammen,
ich habe folgende Problemstellung:
Eine Exceldatei *xlsx mit insgesamt 4 Tabellenblättern.
Tabellenblatt 1 - Material Data - Dateneingabe ab Zeile 2.
Tabellenblatt 2 - ABCXYZ - nicht relevant für das Problem
Tabellenblatt 3 - Life Time Cycle - Berechnung, di...
16.09.2009 09:14:54
Thread-ID: 1103102
5 Beiträge
aus anderer Mappe Spalten importieren VBA
Wolfgang

Hallo,
aus einer anderen Anwendung wird eine Excel-Mappe mit Namen "Liste1" generiert. Wäre denkbar, dass ich aus dieser geöffneten Mappe mittels VBA bestimmte Spalten (z.B. A-C, dann erst wieder F, H etc.) in eine neue Mappe importieren kann. Problem ist vielleicht, dass die Überschriften...
27.09.2009 12:28:39
Thread-ID: 1105822
7 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