Größenbeschränkung Formelabfrage vba

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Karsten,
Die Formellänge packt der Rekorder nicht.
Folgende Lösung von Daniel:
Hi
wenn du die Eingabe dieser Formel als Makro benötigst, dann kannst du das nicht aufzeichnen, weil die Formel für den Recorder zu lang ist.
Wenn du die Formel trotzdem im Makro haben willst, dann kannst du folgendermassen vorghehen:
- Formel von Hand in die Zelle eintragen
- Formel markieren
- in den VBA-Editor und dort ins Direktfenster wechseln
- dort den Befehl eintippen: ?Selection.FormulaLocal
- das Ergebnis kannst du dann in deinen Makrocode reinkopieren:
Range("A1").FormulaLocal = "hier deine Formel"
du musst dabei allerdings folgendes Beachten:
Anführungszeichen, die zur Formel gehören, müssen verdoppelt werden, damit der VBA-Editor das richtig erkennen kann:
Range("A1").FormulaLocal = "=""In Zelle A2 steht: ""&A2"
bei einer Formel wie deiner kannst du dazu die Funktion ERSETZEN nutzen, dazu den Formeltext ZWISCHEN den äusseren Anführungszeichen Markieren und auf BEARBEITEN - ERSEZTEN klicken und dann "markierten TExt" auswählen.
Gruß Werner

Hi
es gibt in VBA mehrere diesbezügliche Beschränkungen.
tatsächlich ist es so, dass eine von Hand eingegebene Formel deutlich länger sein darf als eine Formel, die per VBA geschrieben wird (ich meine c.a. 4000 zu 1000 zeichen, auch Versionsabhängig)
die zweite Einschränkung betrifft den VBA-Editor. eine Codezeile darf eine bestimmte Länge nicht überschreiten.
das Limit des VBA-Editors kannst du relativ einfach umgehen:
- erstelle den Formeltext in einer Variablen in mehrern Schritten:

dim FO as String
FO = "=Teilformel1"
FO = FO & "Teilformel2"
FO = FO & "Teilformel3"
usw
Range("O5").FormulaR1C1 = FO

wenn das erste Limit umgangen werden soll, wird's etwas komplizierter.
hierszu muss die Formel als normaler Text in die Zelle geschrieben werden.
Das kann man dadurch erreichen, dass man statt dem "=" eine andere Zeichenfolge, welche sonst nicht in der Formel vorkommt, an den Anfang stellt.
Dann ist die Eingabe keine Formel, sondern ein normaler Text.
dann ersetzt man mit der Menüfunktion ERSETZTEN (in VBA dann Replace) die Zeichenfolge durch das Gleichheitszeichen.
Excel wird dann den Text in eine Formel wandeln. Da jetzt Excel diese Umwanlung macht, gilt die Längenbeschränkung von Excel und nicht die von VBA.
Der Formeltext muss dann allerdings in der A1-Addressierungsart geschrieben werden, nicht in R1C1.
Gruß Daniel

Beliebteste Forumthreads (12 Monate)

Größenbeschränkung Formelabfrage vba

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread