VBA Filtern Hilfe

Das funktioniert so nicht.
<br />Ich möchte in Tabelle Info folgende werte automatisch angezeigt bekommen.
<br />Wenn Tabelle Aktuelle Fälle B3 = Ja und Wert in Y3 gleich oder größer Heute in Tabelle Info Zelle B5
<br />Wenn Tabelle Aktuelle Fälle D3 nicht leer und Wert in Y3 gleich oder größer Heute und identisch mit Wert in Zelle B5 in Tabelle Info Zelle C5
<br />Wenn Tabelle Aktuelle Fälle F3 nicht leer und Wert in Y3 gleich oder größer Heute und identisch mit Wert in Zelle B5 in Tabelle Info Zelle D5
<br />Wenn Tabelle Aktuelle Fälle G3 nicht leer und Wert in Y3 gleich oder größer Heute und identisch mit Wert in Zelle B5 in Tabelle Info Zelle E5
<br />Wenn Tabelle Aktuelle Fälle Y3 nicht leer und Wert in Y3 gleich oder größer Heute und identisch mit Wert in Zelle B5 in Tabelle Info Zelle F5
<br />Alle werte Zählen in Tabelle Aktuelle Fälle spalte H die Text Mitarbeiter enthalten und identisch mit den Werten aus B5 und C5 in Tabelle Info
<br />Alle werte Zählen in Tabelle Aktuelle Fälle spalte H die Text Bewohner enthalten und identisch mit den Werten aus B5 und C5 in Tabelle Info
<br />Alle werte Zählen in Tabelle Aktuelle Fälle spalte H die Text Mitarbeiter enthalten und identisch mit den Werten aus B5 und C5 in Tabelle Info und wert in Tabelle Aktuelle Fälle Y3 gleich oder größer Heute ist
<br />Alle werte Zählen in Tabelle Aktuelle Fälle spalte H die Text Bewohner enthalten und identisch mit den Werten aus B5 und C5 in Tabelle Info und wert in Tabelle Aktuelle Fälle Y3 gleich oder größer Heute ist
<br />das soll sich Automatisch aktualisieren. so das ich zu dem Fall mit der entsprechenden Fallnummer und Gebäude tagesaktuelle werte habe
<br />

Hallo Sascha,
<br />VBA ist englisch, daher musst du englischen Funktionen und Trennzeichen verwenden. Hier nun 3 Formeln, die anderen kannst du entsprechend selbst anpassen:
<br />

Range("B5").Formula = "=IF(AND('Aktuelle Fälle'!B3=""Ja""," _

& "'Aktuelle Fälle'!$Y3<$C$2),"""",'Aktuelle Fälle'!C4)"

Range("C5").Formula = "=IF('Aktuelle Fälle'!$D3="""","""",IF('Aktuelle Fälle'!" _

& "$Y3<$C$2,"""",VLOOKUP($B5,'Aktuelle Fälle'!$C3:$AG10000,2,0)))"

Range("G5").Formula = "=COUNTIFS('Aktuelle Fälle'!$C:$C,$B5,'Aktuelle Fälle'!" _

& "$D:$D,StabInfo!$C5,'Aktuelle Fälle'!$H:$H,""Mitarbeiter"")"

Claus
<br />

bin gerade am VBA Lernen und eine frage an euch!habe mehre Formeln erstellt möchte diese in VBA schreiben weil Excel sehr lange lädt.

Wenn die lange Ladezeit das Problem ist wird Dein Unterfangen keine Abhilfe bringen, wenn die Formeln in das Blatt geschrieben werden müssen sie alle auch nochmals berechnet werden! Und wenn Sie drin sind, dann müsstest Du theoretisch diese vor dem Speichern wieder entfernen, sonst werden sie beim nächsten Mal beim Öffnen geladen ... ergo => das macht alles keinen Sinn.
<br />Das Range-Objekt hat auch eine FormulaLocal Eigenschaft, diese akzeptiert Formeln in Deiner Sprache ... Deutsch in einem Deutschen Excel.
<br />Eine Schleife braucht es bei Formeln nicht, Excel füllt relative Formeln folgerichtig und ändert die Bezüge ab. Beispiel:
<br />Sub Test()
Range("B1:B10") = "=A1+1"
End Sub

<br />Lass das in einer neuen Datei laufen und schau Dir die Formeln in Spalte B an.
<br />Andreas.
<br />

Vielen Dank Claus,
<br />kann man hier noch eine Schleife mit einbinden?
<br />Zweck ist sobald ein Neuer Fall in Tabelle Aktuelle Fälle eingetragen wird er Automatisch mit in Tabelle Info angezeigt wird.
<br />

Das funktioniert so nicht.

Doch, das tut es, Excel funktioniert wie Excel funktioniert und nur das können wir Dir sagen.
<br />Wir haben Dir gesagt wie man die Formeln da reinbekommt und was es für Auswirkungen hat. Über filtern haben wir noch gar nicht geredet, daher kann ich noch nicht mal nachvollziehen was da nicht funktionieren soll.
<br />Schreib einfach von Hand in jede Zeile eine Formel für jedes Kriterium und ziehe sie nach unten, dann kannst Du jedes separat prüfen und schauen ob die Logik Deiner Formel funktioniert, bzw. woran es liegt wenn das Ergebnis unerwartet ist.
<br />Dann kombiniert Du alle Einzelergebnisse mit einer ODER Formeln und diese Spalte filterst Du.
<br />Andreas.
<br />