Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 14:29:30
Matrixkonstanten als Quelle für Gültigkeit und Steuerelement
16.04.2024 13:54:06
Multiplikation
16.04.2024 12:41:11
Vielleicht Onur ? Leider werden nicht alle Monate
16.04.2024 12:08:33
Zelle/Spalte bestimmten Wert in Kopfzeile zuordnen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
484to488
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
484to488
484to488
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA If Then Else Problem

VBA If Then Else Problem
15.09.2004 11:15:07
Rehhirsch
Hallo, ich nochmal. Also folgendes Problem : Angenommen ich habe in der Spalte C in der 1. Zelle "Mario Henze" zu stehen und in der 2. Zelle "Mario Himbeer Henze". Nun teile ich diese mittels Script in mehrere Zellen auf, so daa der 1. Name nun 2 weitere Zellen belegt, nämlich D und E, und der 2. Name 3 weitere Zellen, nämlich D und E und F. Nun möchte ich dass das Script mittels If ... Then ... Else ... Formel erkennt ob in einer Zelle von Spalte F etwas steht und wenn ja, dass er dann den Inhalt in der dazugehörigen Zelle von Spalte C an den Anfang setzt und dann den Inhalt der anderen beiden Zellen dahinter, mit dieser Formel :
ActiveCell.FormulaR1C1 = "=+RC[3] &"" "" &RC[1] &"" "" &RC[2]"
Wenn in der Zelle von Spalte F allerdings nichts steht soll er diese Formel anwenden : ActiveCell.FormulaR1C1 = "=+RC[2] &"" "" &RC[1]" .
Er soll praktisch zwischen Namen mit einem Vornamen und namen mit 2 Vornamen unterscheiden und die jeweilige Formel anwenden. Kann mir jemand sagen wie ich das machen kann? Ich weiß dass dies eine sehr komplizierte Umschreibung ist, aber ich weiß nich wie ich es noch genauer bescheiben soll, da mir in anderen Foren irgendwie keiner helfen kann...
Wenn noch Fragen sind bitte stellen, ich antworte sofort!
MfG Rehhirsch

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA If Then Else Problem
15.09.2004 11:40:03
Dominic
Man kann es auch mit der Wenn Formel machen:
ActiveCell.FormulaR1C1 = "=IF(RC[3]="""",RC[2]&"" ""&RC[1],RC[3]&"" ""&RC[1]&"" ""&RC[2])"
Dominic
AW: VBA If Then Else Problem
15.09.2004 12:23:21
Rehhirsch
Alles klar danke, so funktioniert es schon mal recht gut. Wie muss ich aber die Formel :
Selection.FormulaR1C1 = "=IF(RC[3]="""",RC[2]&"" ""&RC[1],RC[3]&"" ""&RC[1]&"" ""&RC[2])"
umschreiben, wenn ich zum beispiel einen Namen mit 4 Bestandteilen habe, wie z.B.:
"Mario u. Christian Krakau"
Daraus soll er "Krakau Mario u. Christian" machen.
MfG Rehhirsch
AW: VBA If Then Else Problem
15.09.2004 12:33:05
Dominic
Gib es eine maximale Begrenzung der Anzahl der Vornamen?
Anzeige
AW: VBA If Then Else Problem
15.09.2004 12:36:16
Rehhirsch
Ja ich glaube mehr als 3 Vornamen hat keiner, also besteht kein Name aus mehr als 4 Teilen.
AW: VBA If Then Else Problem
15.09.2004 12:53:33
Dominic
Wenn du lange If... Then... Else... Formeln vermeiden möchtest, hier eine Lösung die Du beliebig erweitern kannst:
ActiveCell.FormulaR1C1 = "=TRIM(CONCATENATE(RC[4],"" "",RC[1],"" "",RC[2],"" "",RC[3]))"
CONCATENATE = Verketten der Zellinhalte mit einer Leerzeichen, also bei nur eine Vorname werden 2 Leerzeichen hinten stehen.
TRIM = Glättet das Ergebnis: alle unnötigen Leerzeichen löschen, d.h. die 2 letzten im Beispiel.
Dominic
AW: VBA If Then Else Problem
15.09.2004 13:34:06
Rehhirsch
Ja OK, dadurch wäre das Problem mit den 4 Namen gelöst, danke bis dahin, allerdings kann ich dann diese Formel nicht auf alle Fälle anwenden, also nicht auf Namen die nur aus 2 oder 3 Teilen bestehen. Es sieht ja so aus, dass das Script ausgeführt werden soll und der eine Teil Scripts, um den es ja hier geht, dann eine Spalte mit tausenden von Namen durchläuft und diese dann in die richtige Reihenfolge bringen soll. Kannst mir da auch weiterhelfen? Bitte...
MfG Rehhirsch
Anzeige
AW: VBA If Then Else Problem
15.09.2004 14:08:12
Dominic
Was für eine Sortierung nimmst Du vor: Name, Vorname, Anzahl Vornamen? Was soll denn passieren?
Wenn ich mehr weis kann ich vielleicht weiterhelfen.
Dominic
AW: VBA If Then Else Problem
15.09.2004 14:34:58
Rehhirsch
Naja, zunächsteinmal glaube ich dass ich es jetzt hinbekommen habe und zwar mit dieser superkomplizierten Formel :
Selection.FormulaR1C1 = "=IF(RC[4]="""",(IF(RC[3]="""",RC[2]&"" ""&RC[1],RC[3]&"" ""&RC[1]&"" ""&RC[2])),TRIM(CONCATENATE(RC[4],"" "",RC[1],"" "",RC[2],"" "",RC[3])))"
Also mit dieser Formel scheint er es so richtig zu machen : Er soll erst gucken ob der Name aus 4 Teilen besteht, wenn nicht wendet er deine erste Formel an, wo er den Nachnamen vor den oder die Vornamen setzt.
Wenn der Name allerdings aus 4 Teilen besteht wendet er deine zweite Formel an, wo er den Nachnamen vor den anderen eventuellen Vornamen setzt.
Es scheint soweit jetz alles zu klappen, außer dass er wenn der Name nur aus einem Teil besteht nach der ganzen Prozedur ein Leerzeichen davor macht. Eigentlich sollte dies ja durch das Trim weggehen, aba das funzt wohl noch nicht so richtig...
Ist dieser Weg, also mit der obigen Formel der richtige oder gibt es einen anderen besseren?
Danke für deine Hilfe bis jetz!!!
MfG Rehhirsch
Anzeige
AW: VBA If Then Else Problem
15.09.2004 14:55:30
Dominic
Wenn Du TRIM an den Anfang der Formel setzt, dann sollte es gehen. Jetzt wird TRIM nur dann ausgeführt wenn es 4 Namen findet:
"=TRIM(IF(RC[4]="""",IF(RC[3]="""",RC[2]&"" ""&RC[1],RC[3]&"" ""&RC[1]&"" ""&RC[2]),RC[4]&"" ""&RC[1]&"" ""&RC[2]&"" ""&RC[3]))"
Dominic
AW: VBA If Then Else Problem
15.09.2004 15:01:25
Rehhirsch
Jo alles klar danke!!!

305 Forumthreads zu ähnlichen Themen

If Then mit mehreren Schritten
Pfannen-Meister

Guten Morgen,
leider ist mein Betreff etwas unglücklich formuliert, aber ich weiß nicht, wie ich mein Problem in wenigen Worten zusammen fassen soll:
In VBA nutze ich eine If Then Anweisung. Ist die Bedingungen erfüllt, so soll er mehrer Schritte abarbeiten. Aber wie sage ich ihm, daß...
13.08.2008 10:34:00
Thread-ID: 1001416
5 Beiträge
Anzeige
VBA - if anweisung mit variable
Thomas

Hallo,
ich habe ein blöds Problem und zwar habe ich folgendes If Abfrage in einer Forschleife in Pseudo:
Wenn A1 kleiner als A2 tu dies sonst tu das
VBA:
For i = 2 To 5 If "A" & i
Irgendwie trifft dort immer nur Else ein, ich glaube es liegt an der Bedingungsformulier...
16.10.2008 10:10:50
Thread-ID: 1016763
4 Beiträge
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
If then else für Anfänger
Gunter

Hallo Zusammen,
wenn ich eine If then else Abfrage habe z.B:
If ComboBox2.Value = "Trailer" And TextBox10.Value = "" Then _
Label36.Visible = True
TextBox10.BackColor = &HFF&
If ComboBox2.Value = "Spot" And TextBox11.Value = "" Then _
Label37.Visible = True
T...
30.11.2008 12:49:00
Thread-ID: 1029010
9 Beiträge
IF/ELSE in Excel (Porto anhand Gewicht berechnen)
Thomas

Hallo zusammen,
ich erstelle gerade ein Bestellformular mit Excel 2007 und möchte ein IF/ELSE Abfrage erstellen, die im Großen und Ganzen anhand eines bekannten Gewichtes die Preisliste von DHL abbildet.
Das ganze würde ich so oder so ähnlich formulieren:
if ($gewicht_kg >...
30.01.2009 12:55:49
Thread-ID: 1045369
5 Beiträge
If und else in Label.caption
Leon

Hi Zusammen
Was mache da falsch, daß Range I11 immer angezeigt wird obwohl nichts drin steht. Falls Range I11 grösser als 0 dann I11 zeigen ansonsten H11.
Private Sub userform_initialize() If Sheets("Wesentlichkeit").Range("I11") >= 0 Then Label20.Caption = Sheets("Wesentlichkeit")...
31.01.2009 22:28:06
Thread-ID: 1045773
3 Beiträge
Sumif mit 2 Bedingungen
HeinzS

Hallo zusammen, kann mir jemand sagen, wie ich die formel richtig aufbauen muß:
Aufgabenstellung: Addiere alle Zahlen aus dem Bereich A1:A100, welche entweder =123 sind? Habe es mit Sumif versucht, scheitere aber an der 2ten Bedingung.
Danke für eure Hilfe!
Lg, Heinz
04.02.2009 10:26:00
Thread-ID: 1046913
4 Beiträge
Zählenwenn mit mehreren Bedingungen
Thomy

Hallo Excelprofis
Ich habe 2 Spalten. In der 1. befinden sich Zahlen und in der 2. Namen.
Welche Formel muss ich verwenden, wenn ich die Anzahl Zahlen in der Spalte A ermitteln will, die grösser als 2 und kleiner als 6 sind und in der Spalte B der Name Meier steht.
Ich bin mal bis...
13.03.2009 15:38:03
Thread-ID: 1059916
2 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
4
2
3
5
5
8
4
2
3
1
3
8
1
3
4
4
9
3
5
7
12
2
4
8
9