Live-Forum - Die aktuellen Beiträge
Datum
Titel
10.05.2024 13:34:11
Prozentuale Auswertung
10.05.2024 13:04:04
Stundenberechnung ohne 22:00 - 06:00 & Sonntag
10.05.2024 12:29:14
Alle ActiveX-Optionbuttons aus einem Groupname auf "Fal
10.05.2024 12:14:16
Darunterzellen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1416to1420
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1416to1420
1416to1420
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

statische CountIf-Funktion in dynamisch umwandeln?

statische CountIf-Funktion in dynamisch umwandeln?
07.04.2015 11:24:45
Robert
Hallo,
ich habe eine statische Funktion die mir die Anzahl verschiedener Kostenstellen in einer Spalte berechnet:
anzahlKostenstellen = Evaluate("=Sum(If(F2:F1293"""",1/CountIf(F2:F1293,F2:F1293)))")

Diese Funktion möchte ich nun so umändern, dass ich Spalte und Zeilenende vorgebe. Die gesucht Spalte (Dim spalteKostenstelle As Integer) und das gesuchte Zeilenende (Dim letzteZeile As Integer) habe ich mir bereits errechnet. Aber wie bekomme ich diese Variablen in die Funktion?
Ich habe es bereits für F2:F1293 folgendes probiert:
Range(Cells(2, spalteKostenstelle), Cells(letzteZeile, spalteKostenstelle))
Das sieht dann so aus:
anzahlKostenstellen = Evaluate("=Sum(If(Range(Cells(2, spalteKostenstelle), Cells(letzteZeile, spalteKostenstelle))"""",1/CountIf(Range(Cells(2, spalteKostenstelle), Cells(letzteZeile, spalteKostenstelle)),Range(Cells(2, spalteKostenstelle), Cells(letzteZeile, spalteKostenstelle)))))")
Dann kommt aber der Fehler "Laufzeitfehler 13 - Typen unverträglich"
Kann jemand helfen?

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: statische CountIf-Funktion in dynamisch umwandeln?
07.04.2015 11:30:01
Born
Hallo Robert,
kommt der Fehler auch, wenn Du nur einen der beiden Parameter dynamisch machst, den anderen aber erstmal statisch lässt? SInd die beiden Variablen vor dem Aufruf der Funktion schon mit einem Wert belegt?
Viele Grüße,
M. Born

AW: statische CountIf-Funktion in dynamisch umwandeln?
07.04.2015 11:36:37
Robert
Hi Born,
also die beiden dynamischen Werte werden vorher belegt und sind somit vorhanden. Meinst Du anstelle von "letzteZeile" einen festen Wert eintragen damit nur noch spalteKostenstelle dynamisch ist z.B. so:
anzahlKostenstellen = Evaluate("=Sum(If(Range(Cells(2, spalteKostenstelle), Cells(1293, spalteKostenstelle))"""",1/CountIf(Range(Cells(2, spalteKostenstelle), Cells(1293, spalteKostenstelle)),Range(Cells(2, spalteKostenstelle), Cells(1293, spalteKostenstelle)))))")
Es kommt immernoch die gleiche Fehlermeldung :-(

Anzeige
AW: statische CountIf-Funktion in dynamisch umwandeln?
07.04.2015 11:38:35
Born
Hallo Robert,
genau das meinte ich. Probiere mal dasselbe, indem Du jetzt die andere Variable nutzt und so Dich Schritt für Schritt an den Fehler herantastest.
Viele Grüße,
M. Born

AW: statische CountIf-Funktion in dynamisch umwandeln?
07.04.2015 11:41:40
Daniel
Hi
für das Evaluate brauchst du den Textstring in genau dieser Form mit der A1-Addressierung.
am einfachsten gehts so:
erstelle erstmal den Formeltext für die Evaluierung mit Dummy-Zeichen ("xxx") für den Bereich der Variabel sein muss.
"Berechne" den einzusetzenden Text und ersetze die Dummy-Zeichen durch diesen Text.
Sub test()
Dim anzahlKostenstellen As Long
Dim strEVA As String
Dim letzteZeile As Long
Dim Spalte As Long
Dim strZellbereich As String
letzteZeile = 1293
Spalte = 6
strEVA = "=Sum(If(xxx"""",1/CountIf(xxx,xxx)))"
strZellbereich = Range(Cells(2, Spalte), Cells(letzteZeile, Spalte)).Address(0, 0)
strEVA = Replace(strEVA, "xxx", strZellbereich)
anzahlKostenstellen = Evaluate(strEVA)
End Sub
Gruß Daniel

Anzeige
AW: statische CountIf-Funktion in dynamisch umwandeln?
07.04.2015 12:28:15
Robert
Vielen Dank.
Das hat geklappt :-)

300 Forumthreads zu ähnlichen Themen

Zeilen einfärben mit mehreren Bedingungen
donald

Hallo Forum,
ich bräuchte eure Hilfe. Ich möchte folgendes erreichen:
wenn in spalte B "Ja"/"Nein" reingeschrieben wird, soll Excel die Zeile entsprechend einfärben (Grün/gelb). Das ist an sich noch gar nicht das Problem. In Spalte C wird ebenfalls eine Ja/Nein-Abfrage erwartet, so da...
22.10.2008 12:03:56
Thread-ID: 1018296
6 Beiträge
Anzeige
ZÄHLENWENN() mit mehreren Bedingungen
Kasimir

Hallo Leute,
irgendwie komme ich nicht weiter. Ich möchte eine ZÄHLENWENN()-Funktion mit mehreren Bedingungen erstellen, scheitere aber kläglich daran. Ich möchte eigentlich nur Zählen, wenn in Spalte B und C und D etwas steht. Das Ganze von Zeile 20 bis 269.
Mal als Beispiel, in Zelle...
14.03.2009 14:22:53
Thread-ID: 1060148
4 Beiträge
Schriftart einer Email aus Excel mit VBA änder
Helmut

Hallo,
ich generiere aus Excel eine Email und möchte in dieser generierten Email die Schriftart im Body verändern.
Kann mir jemand helfen?
Danke
Helmut
11.05.2009 15:01:05
Thread-ID: 1074366
2 Beiträge
Anzeige
Schleife von Basic in VBA umschreiben
Basic

Hallo Excel-Freunde,
da ich kein VBA-Basic schreiben kann, würde ich gerne eure Hilfe beanspruchen.
Die vorliegende Basic For Next Schleife läuft mit den angegebnen Variablen und Parameter,
würde sie gerne in VBA_Code mit einem Makro jedesmal starten.
A = 11 : B = 12
For I =...
18.07.2009 17:17:03
Thread-ID: 1089659
9 Beiträge
zählenwenn mit mehreren bedingungen
di

Hallo,
ich versuche eine zählenwenn Funktion mit mehreren Bedingungen aufzubauen. Dafür verwende ich die Funktion summenprodukt.
Es sollen dabei aus einer Tabelle für jede Woche die Anzahl der Arbeitstage ermittelt (gezählt werden). Die Wochen sind fortlaufend nummeriert, die Tage von 1...
23.07.2009 13:44:29
Thread-ID: 1090803
4 Beiträge
VBA-Befehl: Zeichen in Schriftart nicht vorhanden
Alex

Schönen guten Tag zusammen,
leider ist der Betreff nicht sehr aussagekräftig, da ich für die Frage etwas weiter ausholen muss. Man möge mir verzeihen.
Lage: Ich will mir für eine Schriftart Code Charts analog denen auf unicode.org erstellen (Beispiel: http://www.unicode.org/charts/PDF/U...
30.09.2009 00:02:51
Thread-ID: 1106220
5 Beiträge
Auslesen von Daten mit mehreren Bedingungen
Daten

Hallo...,
ich habe mit der folgenden Formel einen Wert aus einer Tabelle ermittelt:
=INDEX(Tabelle1!$G$3:$G$380;VERGLEICH(Tabelle1!A149&Tabelle1!B149; Tabelle1!$A$3:$A$342&Tabelle1!$B$3:$B$672;0))
Da die Werte der Spalten A und B in Tabelle1 ständig die Zeilen wechseln wür...
07.10.2009 13:01:49
Thread-ID: 1107773
10 Beiträge
VBA Daten einlesen mit var. Überschriftenzeile
Stefan

Hallo zusammen,
ich habe vor einiger Zeit hier schon mal um Rat gefragt als ich Daten aus einer externen Arbeitsmappe einlesen wolle. Nun möchte ich in einem Optionsblatt eine Variable einbinden in der die Überschriftenzeile zum einlesen steht:
Public Sub data() Dim objWB As Workbook, o...
17.11.2009 13:40:57
Thread-ID: 1117728
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
1
3
1
1
8
3
4
9
5
11
3
6
2
2
5
2
6
4
3
5
3
6
14
4