Hallo Leute,
https://www.herber.de/bbs/user/159657.xlsb
in o.g. Beispieldatei steht in Zelle "F3" die nachfolgende Formel:
="MUSTER, Hans *1992; " &(DATEDIF(A3;B3;"y"))& " Jahre"
Nun soll diese Formel aber mittels VBA in das Blatt eingefügt werden.
Das funktioniert auch wenn die Formel in folgender Scvhreibweise eingefügt wird:
Range("F9").FormulaLocal = "=DATEDIF(A3;B3;""y"")"
Im Moment stehe ich vor 3 ungelösten Problemen:
1. Hinter der Formel soll noch der Zusatz " Jahre" eingefügt werden.
2. Die mit A3 und B3 bezeichneten Zellen sollen variabel eingefügt werden, z. B.: "A" & Zeile; "B" & Zeile
3. In der Zelle "F9" sollen noch die Platzhalter für NAME, Vorname, und Geburtsjahr (welche durch z. B. "MUSTER, Hans *1992")ersetzt werden VOR "=DATEDIF(A3;B3;""y"")" & " Jahre" eingefügt werden. Hier bitte nur die korrekte von VBA-akzeptierte Schreibweise angeben, ein Beispiel für das Ersetzen der Platzhalter ist entbehrlich.
Die Schreibweise in Zelle"F11" beinhaltet zwar die gleiche Information wie in Zelle "F3".
Da das Tabellenblatt im Original hunderte Namen und Geburtsjahre enthält die sich naturgemäß jedes Jahr um 1 Jahr erhöhen (Zelle"A1") soll sich natürlich auch das angezeigte Lebensalter entsprechend erhöhen. Bei der EXCEL-Formelschreibweise geschieht das auch.
Das Lebensalter in Zelle"F11" bleibt jedoch konstant bei 17 jahren unabhängig von der in Zelle"A1" enthaltenen Jahreszahl, deshalb bevorzuge ich die eingefügte Formelschreibweise.
mfG
reiner