wenn du das dann ganz genau nimmst, dann sind das aber nicht Zellen die Zahlen oder Text beinhalten, sondern Zellen die Text und Zahlen Beinhalten und das hat der TE so nicht Geschrieben....
Hallöchen,
Es geht um Wörter und Zellen, die leer sind oder Zellen, die Zahlen
beinhalten
Wenn in meinem Garten Bienen fliegen, er also Bienen
beinhaltet, heißt das nicht, dass ich keine Blumen habe. Auch wenn ich nicht explicit darauf hingewiesen habe könnte es sein, das Blumen drin sind. Um mal die Sache mit den Bienen und den Blumen aufzugreifen
.
Hier mal eine Makrolösung. Die berücksichtigt aber auch nur reine numerische Zellen nicht.
Code:
Public Function txtVerketten1(rngRange As Range, _
Optional strConn As String = ";", _
Optional bEmpty As Boolean = False, _
Optional bNumOrTxt As Boolean = False) As String
'Variablendeklarationen
Dim rngCel As Range
Dim arrCel
Dim iCnt&
'Array entsprechend Zellen dimensionieren
ReDim arrCel(rngRange.Cells.Count)
'Schleife ueber alle Zellen
For Each rngCel In rngRange
'wenn was in der Zelle ist
'oder Leere beruecksichtigt werden sollen, dann
If rngCel <> "" Or bEmpty Then
'Wenn die Zelle dem Parameter bNumOrTxt entspricht, dann
If IsNumeric(rngCel) = bNumOrTxt Then
'Inhalt in Array uebernehmen
arrCel(iCnt) = CStr(rngCel.Value)
'Zaehler hochsetzen
iCnt = iCnt + 1
'Ende Wenn die Zelle dem Parameter bNumOrTxt entspricht, dann
End If
'Ende wenn was in der Zelle ist ...
End If
'Ende Schleife ueber alle Zellen
Next
'Array entsprechend Inhalten dimensionieren
ReDim Preserve arrCel(iCnt - 1)
'Text verketten und Rueckgabe zuweisen
txtVerketten1 = Join(arrCel, strConn)
End Function
Arbeitsblatt mit dem Namen 'Tabelle1' |
| A | B | C | D |
1 | A | 1 | B | A;B;C;D |
2 | | C | D | 1 |
Zelle | Formel |
D1 | =txtVerketten1(A1:C2;";") |
D2 | =txtVerketten1(A1:C2;";";;WAHR) |
Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016 |
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg |
(23.09.2018, 10:20)WillWissen schrieb: [ -> ]... Aber lassen wir mal die Strumpf-Maus zu Wort kommen.
Hallo, so wie bei den letzten Anfragen..? Hier wäre sicher ein sinnvolles Beispiel in einer XL-Datei hilfreich. Ich denke, dass das hier mit einer Formel schwer umsetzbar ist... Auch NICHT(mit_einer_VERKETTUNG())
VERKETTEN(WENN(NICHT())) ist schon
speziell...
Vielen Dank für die vielen Vorschläge
Was mein größtest Problem ist, ich muss in jeder Formel die Zellen angeben die Text enthalten könnten, d.h. wenn ich einen Bereich von 200 Zellen habe macht das viel Arbeit.
Gibt es nicht die Möglichkeit das einfacher zu gestalten, in dem man einfach einen Bereich angibt z.B. C3:T5 ?
Hallo,
erklär doch mal bitte, zu was das gut sein soll, 200 Zellen in einer einzigen zusammenzufassen. Einen sinnvollen Anwendungsbereich kann ich mir aktuell nicht vorstellen.
Hallöchen,
geht mit meiner VBA-Funktion. Ansonsten war noch die Frage offen, was mit Zellen geschehen soll, die Wörter und Zahlen enthalten.
Ich hab an einer kleineren Formel gebastelt, komm aber nimmer weiter! Vielleicht kommt noch jemand anderes auf die Lösung, wie ich aus den Adressen vll noch die Werte ziehen kann... ich hab's bereits mit Zelle("Inhalt",), Indirekt() und Index() versucht, das will er aber nicht...
Arbeitsblatt mit dem Namen 'Tabelle1' |
| A | B | C | D | E | F | G | H | I | J | K | L | M | N | O | P | Q | R | S | T |
5 | $F$5 $G$5 $I$5 $J$5 $K$5 $O$5 $F$6 $G$6 $F$7 $G$7 $F$8 $G$8 | | | | | l | l | | j | li | joj | 6 | | 5 | ö | | | | | |
6 | | | | | | l | l | | | | | | | | | | | | | |
7 | | | | | | l | l | | | | | | | | | | | | | |
8 | | | | | | l | l | | | | | | | | | | | | | |
Zelle | Formel |
A5 | {=TEXTVERKETTEN(" ";1;WENNFEHLER(ADRESSE(ISTTEXT(F5:T8)*ZEILE(F5:T8);ISTTEXT(F5:T8)*SPALTE(F5:T8));""))} |
Achtung, Matrixformel enthalten! |
Die geschweiften Klammern{} werden nicht eingegeben. |
Verlassen Sie den Zelleneditor mit Strg+Shift + Enter, statt Enter alleine. |
Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016 |
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg |
Moin!
Dem Wunsch nach einer kleinen Beispieldatei bist Du immer noch nicht nachgekommen.
Insbesondere ist unklar, ob Bienen und Blumen in EINEM Garten vorkommen können. :21:
Hallo
Und es wäre wichtig zu erfahren ob Excel 2016 die Kaufversion oder die Aboversion ist.
Mit der Aboversion wäre der Einsatz von TEXTVERKETTEN() möglich.
(23.09.2018, 14:18)shift-del schrieb: [ -> ]Hallo
...
Mit der Aboversion wäre der Einsatz von TEXTVERKETTEN() möglich.
Hallo, und da gibt's ja ein Vorschlag (ob man den gut verwenden kann - keine Ahnung, ich habe "nur" die 16 er Kaufversion) ...