R1C1 Notifikation

Aston · 2015-05-28T19:09:32+00:00

Liebe Mitstreiter und Excel-VBA-Profis. Da meine Formeln sehr lang sind und ich viele Datensätze habe, ist das Excel am Schluss sehr gross. Um das zu verhindern, möchte ich per VBA beim Öffnen des Excels die Formeln via VBA generieren lassen und auf die benötigte Anzahl Zeilen "runterkopieren". Das klappt. Ich mag den R1C1-Style nicht so und möchte dies in A1-Notation ändern. geht das? Wie bin ich vorgegangen: - Ich starte den Makrorecorder - Zellen, in die ich Formeln eingegeben habe, setze ich mit "F2" in den EDIT-modus, - drücke Enter - stoppe den Recorder und - versuche das dann umzubauen in A1 Notation. Hier habe ich das Problem: Ein Beispiel: ActiveCell.FormulaR1C1 = "=IF(LEN(RC[-2])<8,RC[-2],""XXXX"")" ich wollte es umbauen, was aber nicht klappt... Bitte gebt mir einen Tip, wenn so was geht, wie es hier aussehen müsste. Merci! Gruss Aston

Hi
die R1C1-Notifikatioin ist in der Regel kürzer und einfacher als die A1-Notifikation.
Sie hat einen entscheidenden Vorteil: man kann mit ihr relative Zellbezüge auch wirklich relativ beschreiben während die A1-Schreibweise nur absolute Beschreibungen auch für relative Zellbezüge zulässt.
das hat zur folge, dass man, wenn man einen relativen Zellbezug in A1 beschreiben muss und die Zielzelle für die Formel auch variabel ist, man die Formel "berechnen" muss, während in R1C1 die Formel unabängig von der Zielzelle als fester Textstring beschrieben werden kann und dann für jede Zielzelle "passt".
klar ist die R1C1-Schreibweise für den normalen Excelanwender ungewohnt, weil sie für das normale Arbeiten in Excel einfach praktiabler ist, aber für die Programmierung ist das etwas anders.
Ausserdem verliert die R1C1-Schreibweise viel von ihrer "sperrigkeit", wenn man sich angewöhnt, möglichst alle Zellbezüge, die nicht zwingend relativ sein müssen, absolut zu setzten.
Beispiel:
du willst in die Zelle C1 die formel: =Wenn(Länge(A1) das ergibt dann aufgezeichnet dein:

ActiveCell.FormulaR1C1 = "=IF(LEN(RC[-2])

verwendest du hingegen für die Spalten einen absoluten Bezug (was problemlos möglich ist, wenn du die Formel nach unten ziehst, dann wird kürzer und auch leichter lesbar:

ActiveCell.FormulaR1C1 = "=IF(LEN(RC1)

der Vorteil gegenüber der A1-Schreibweise ist:

ActiveCell.FormulaR1C1 = "=IF(LEN(A1)

dass du in R1C1 die Formel nicht ändern musst, wenn dir nachträglich einfällt, dass eine Überschrift ganz nett wäre, weil das R1C1 für jede Zeile passt, währen du das A1 dann ändern musst.
Gruß Daniel

…nämlich an deinem eigenen, übergroßen Ego! Was ich damit meine, habe ich auch geschrieben, aber vor lauter übereifrig-eiligem „Gekläff“ kommst du ja wohl nicht mehr zu aufmerksamem Lesen und übrigens auch Schreiben, wie man aus deinen allzuoft von (zu deinen Gunsten angenommenen) Flüchtigkeitsfehlern strotzenden Postings schlussfolgern kann. Das scheint dann ja wohl deine „Liga“ zu sein… :->>
Ich lehne jede weitere, derart unsinnige Diskussion mit einem Individuum unklarer Identität wie dir ab! Du scheinst unter zwanghafter Profilierungssucht zu leiden, was in deinem Fall als trollhaftes Verhalten auffällt. Ich kann mir eigentlich nicht vorstellen, dass ein Daniel, dem es in 1.Linie um die Sache ginge, so etwas nötig hätte. Folglich segelt der, mit dem ich diesen unsäglichen Disput führe, entweder unter falscher Flagge oder hat bei übereinstimmender Identität eine gespaltene Persönlichkeit bzw einen ziemlich egozentrischen Charakter. Solange nicht klar ist, ob es sich tatsächlich um einunddieselbe Person handelt, lasse ich mich auf keine Diskussion mit dir mehr ein, denn diese führt erfahrungsgemäß stets zu nichts weiter als einer Darstellung deines „Krümelkacker-Talents“. Oder wie WF es formulieren würde, du gehst mir auf den Keks!
Alternativvorschlag: Jaule doch den Mond an! Ist evtl sinnvoller… :-]
Mahlzeit! Luc :-?

Forumthread: R1C1 Notifikation

29
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Infobox / Tutorial