Anführungszeichen innerhalb einer Formel entfernen

[b12cw]

Hallo

ich hab schon Google auf der Suche nach einem Lösungsansatz durchsucht, konnte leider bis jetzt nichts entdecken das mir weitergeholfen hätte.
Vielleicht kann mir jemand von euch helfen :)



Formel Zwischenergebnis:
.... (COUNTA('Arbeitsmappe'!B1:"B1566")

CLEAN(..) außenrum zu bauen hat leider nicht geholfen.

Die Anführungszeichen "B1566"sind durch (CONCATENATE("B"&(COUNTA('Arbeitsmappe'!A$1:A$9982)))) reingeraten. Aber ich muss die Zeilennummer variabel halten, weil sich die Anzahl an werten in Arbeitsmappe ändern kann.

Kann mir jemand sagen wie ich innerhalb einer Formel Anführungszeichen löschen kann oder wie ich Zeilennummer dynamisch integrieren und dabei die Anführungszeichen vermeiden kann?

[BoskoBiati]

Hi,

1. würde ich hier den Bereich so groß wählen, dass er immer größer als die Datenmenge ist.
2. funktioniert die Formel so nur mit INDIRECT
3. wäre INDEX hier besser:

Code:

(CountA('Arbeitsmappe'!B1:Index('Arbeitsmappe'!B:B;countA('Arbeitsmappe'!A$1:A$9982))

oder einfacher:

Code:

CountA('Arbeitsmappe'!B$1:B$9982)

[b12cw]

Hi,

1. würde ich hier den Bereich so groß wählen, dass er immer größer als die Datenmenge ist.
2. funktioniert die Formel so nur mit INDIRECT
3. wäre INDEX hier besser:

Code:

(CountA('Arbeitsmappe'!B1:Index('Arbeitsmappe'!B:B;countA('Arbeitsmappe'!A$1:A$9982))

oder einfacher:

Code:

CountA('Arbeitsmappe'!B$1:B$9982)

Vielen Dank für die Antowort :)

Ich kann leider den Bereich nicht groß wählen, weil aus dem Bereich dann Zufallszellen ausgegeben werden sollen. Wenn ich die Anzahl größer als die Datenmenge mache, werden mir auch leere Zeelen ausgegeben. Das ist nicht so optimal.

[Gast 123]

Hallo

wenn der Bereich exakt sein muss dann setze die Formel doch mit Vba ein.  Da kann man vorher die LastZell ermitteln und diese Zeile als Variable einsetzen.  Dann stimmt der Bereich.

mfg Gast 123

 

Code:

Sub Beispiel_Formel_mitLastZell()
 lastzell = Worksheets("Arbeitsmappe").Cells(Rows.Count, 2).End(xlUp).Row
 Range("xxx").FormulaLocal = "CountA('Arbeitsmappe'!B$1:B$" & lastzell & ")"
End Sub