Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
If Textwert in Spalte C gleich UND mind. 1x eine 1 in Spalte G, Else für alle = 1 |
28.02.2020 11:32:51 |
GoranBendtner |
|
|
|
28.02.2020 18:13:03 |
Gast4210 |
|
|
|
03.03.2020 10:43:00 |
Gast10738 |
|
|
Von:
GoranBendtner |
Datum:
28.02.2020 11:32:51 |
Views:
1194 |
Rating:
|
Antwort:
|
Thema:
If Textwert in Spalte C gleich UND mind. 1x eine 1 in Spalte G, Else für alle = 1 |
Hallo zusammen,
als VBA Laie versuche ich es ohne Screenshot zu erklären:
In einer Spalte A mit 1000 Zeilen stehen mehrere Textwerte untereinander. In der Spalte B stehen immer die Werte "0" oder "1" zugeordnet.
Nun möchte ich, dass falls der Text1 in Spalte A in bspw. 8 Zeilen nacheinander auftaucht, dass untersucht wird, ob in Spalte B mindestens einmal eine 1 auftaucht. Als Ergebnis soll für alle 8 Textwerte in A eine "1" in Spalte C zugeordnet werden.
Ab Zeile 9 tritt bspw. in nur 5 Zeilen untereinander ein Text2 auf. Wenn in Spalte B für die 5 Werte nur eine 0 steht, erhalten alle 5 Textwerte eine 0 in Spalte C. USW......
Da die Anzahl der Zellen untereinander variiert, ist es schwierig mit einer Formel zu arbeiten, weswegen ich VBA heranziehe.
Hier meine Versuche ohne VBA:=WENN(UND(C3=C2;G2=1);1;0). Das Problem ist, dass dadurch nicht alle 8 Textwerte bspw. eine 1 zugeordnet bekommen, sondern nur die jeweils aktive Zelle
|
- 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
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- 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
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
If Textwert in Spalte C gleich UND mind. 1x eine 1 in Spalte G, Else für alle = 1 |
28.02.2020 11:32:51 |
GoranBendtner |
|
|
|
28.02.2020 18:13:03 |
Gast4210 |
|
|
|
03.03.2020 10:43:00 |
Gast10738 |
|
|