Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
520to524
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
520to524
520to524
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Formelproblem mit Makro

Formelproblem mit Makro
23.11.2004 14:24:58
Claudia


Hallo liebe Excel Helfer,
ich habe eine Formel siehe nächste Zeile,
=VERKETTEN(TEIL(WECHSELN(A1092;" ";"");1;20);"_";TEIL(WECHSELN(C1092;" ";"");1;6);"_";TEIL(WECHSELN(D1092;" ";"");1;6);"_";TEIL(WECHSELN(E1092;" ";"");1;10);"_";TEXT(F1092;"tt.MM.JJJJ"))
die ich in einem Makro ausführen möchte.
Nach dem Aufzeichnen mit dem Makrorecorder (in Zelle I 1092) erhalte ich diese Formel
ActiveCell.FormulaR1C1 = _
        "=CONCATENATE(MID(SUBSTITUTE(RC[-8],"" "",""""),1,20),""_"",MID(SUBSTITUTE(RC[-6],"" "",""""),1,6),""_"",MID(SUBSTITUTE(RC[-5],"" "",""""),1,6),""_"",MID(SUBSTITUTE(RC[-4],"" "",""""),1,10),""_"",TEXT(RC[-3],""tt.MM.JJJJ""))"
Wenn ich diese Formel ausführe, klappt es auch aber im Tabellenblatt wird die Formel wieder in deutsch angeziegt.
Jetzt zum eigentlichen Poblem
Wie kann ich die Formel so einsetzen, das mir ein Makro in der Spalte I die Formel einsetzt ab der Zeile 2 (<-- Zeile 1 steht eine Überschrift) überall dort, wo in Spalte A, in Spalte C, in Spalte D, in Spalte E und in Spalte F etwas steht.
Wer kann mir helfen?

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

Betreff
Datum
Anwender
Anzeige
AW: Formelproblem mit Makro
23.11.2004 14:38:13
chris
Hi Claudia,
1. ich würde statt .formulaR1C1 nur ".Formula" und dann den Text in etwas abgeänderter Form nehmen. Bei deiner Version musst du die Zellen immer in Abhängigkeit zur aktuellen Zellposition angeben - also relativ. Wenn du die Formel über activecell.formula = "...." eingibts, kannst du die direkten Zelladressen (z.B. cells(3,4).address) nehmen.
2. da die kompl. Formel als String eingegeben wird, kannst du einfach den String an der Stelle teilen, wo die Celladresse rein kommst z.b. "CONCATENATE(MID(SUBSTITUTE(" & cells(1,1092).address & "......" - das machst du für alle Cellpositionen
3. willst du die Formel in jede beliebige Zelle (mit irgendeinem Inhalt), oder gibt es dafür bestimmte Kriterien, sonst such doch einfach nach "*" mit der "find-Methode"
Gruss
Chris
Anzeige
AW: Formelproblem mit Makro
xule
Hallo zusammen
...wenn du jetzt noch .FormulaLocal = verwendest, kannst du sogar die deutschen Befehle verwenden, so wie du sie aus dem Tabellenblatt her kennst.
Gruß aus Siegen
AW: Danke für den Tip
23.11.2004 15:37:13
chris
... man lernt nie aus :o)
Danke Euch zwei
23.11.2004 22:06:55
Claudia
Hallo Ihr zwei,
vielen Dank für Eure Tips, werde Sie gleich mal umsetzten.
Sorry, war sehr lange in einen sch... Meeting.
Gruß
Claudia

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige