VBA verketten mit wenn dann

[Manuel Thomas]

Hallo,

ich hoffe mann kann mir hier helfe.

ich muss eine VBA erstellen zur reduzierung der formel. anbei folgende formel

=VERKETTEN(WENN('Eintragung Angebote'!T4;'Eintragung Angebote'!B4&ZEICHEN(10);"");WENN('Eintragung Angebote'!T5;'Eintragung Angebote'!B5&ZEICHEN(10);"");WENN('Eintragung Angebote'!T6;'Eintragung Angebote'!B6&ZEICHEN(10);""))


mein Problem ist es das nun ein Zeilen bereich bei Angebot von T2 bis T60 abgedeckt werden muss  un die formel einfach zu lang wird.

da ich das selbe anschließend auch von Zelle C bis AC erweitern muss.

Das gleiche muss zusätzlich noch für eine zweite register karte erstellt werden.

Da ich mit VBA bisher noch keinerlei berührung habe bin ich etwas aufgeschmissen.

Die Spalten haben folgene inhalten:
 
Zielzelle= Text

T = Zahl
B = Text

[WillWissen]

Hallo Manuel,

warum VBA? Du hast XL2019; da kannst du doch deine Texte mit einer Formel verbinden.

Arbeitsblatt mit dem Namen 'Tabelle2'
	A	B	C	D	E	F	G	H	I
1	a	b	c	d	e	f	g
2	a,b,c,d,e,f,g

Zelle	Formel
A2	=TEXTVERKETTEN(",";WAHR;A1:J1)

Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016

Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg

[Manuel Thomas]

Hallo,

Das Problem ist das ist in 1ner Verkettung 50 wenn dann Funktionen habe.

und diese Verkettung wird 86 mal benutzt wo die wenn dann funktion immer auf eine andere Spalte geht .

[WillWissen]

Hi,

zeig mal bitte eine Beispieldatei (keine Bildchen!!) mit deinem Aufbau (incl. deiner Formeln). Du brauchst doch absolut keine WENN()-Fkt.

https://www.clever-excel-forum.de/Thread...ng-stellen

[Manuel Thomas]

Das ist die Quelle wo Produkt geprüft wird.





nun soll im Ziehl alle Kunde angezeigt werden wo ein Produkt bestellt oder dem ein Produkt angeboten wurde.

---

  Disposition problem.xlsx (Größe: 20,72 KB / Downloads: 5)

[WillWissen]

Hallo Manuel,

ich fühle mich verar... Oder wird in deinem Browser mein Satz

zeig mal bitte eine Beispieldatei (keine Bildchen!!)

eventuell ins Chinesische übersetzt?

[Manuel Thomas]

Muss entschuldigen hatte es erst falsch gemacht und dann vergessen rauszulöschen.

---

Habe meine bisherriege formel einmal nun eingetragen zum besser Verständniss.

  Disposition problem.xlsx (Größe: 22,73 KB / Downloads: 5)

[WillWissen]

Ok, mein letzter Versuch!!

zeig mal bitte eine Beispieldatei (keine Bildchen!!) mit deinem Aufbau (incl. deiner Formeln).

ich sehe in deiner Beispieldatei weder die in deinem Eröffnungsbeitrag angegebene Formel noch finde ich ein Tabellenblatt mit dem Namen Eintragung Angebote. Woher soll ich jetzt wissen, wo du was verkettet haben willst?

[Cadmus]

Hallo,

so? Ggf. als Matrixformel speichern.

Übersicht

	A	B
3	Produkt 2	b e f g

verwendete Formeln
Zelle	Formel	Bereich	N/A
B3	{=TEXTVERKETTEN(" ";1;WENN(Quelle!D2: D8>0;Quelle!B2:B8;""))}	$B$3

{} Matrixformel mit Strg+Umschalt+Enter abschließen
Matrixformeln sind durch geschweifte Klammern {} eingeschlossen
Diese Klammern nicht eingeben!!

http://excel-inn.de/dateien/vba_beispiel..._addin.zip

http://Hajo-Excel.de/tools.htm

XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007

Add-In-Version 25.21 einschl. 64 Bit