Beiträge zum Thread: Gleichheitszeichen

Hallo Patrick,

Sub aaa()

ActiveCell.Formula = "=DATEDIF(A1,TODAY(),""Y"")"

End Sub

Gruß, Uwe

Das war ja einfach. Danke. ;-)

Das Gleichheitszeichen ist normalerweise nicht das eigentliche Problem. In VBA musst du die Formel einfach als String korrekt übergeben. Das funktioniert zum Beispiel so:

Range("B1").FormulaLocal = "=DATEDIF(A1;HEUTE();""Y"")"

Wichtig sind die doppelten Anführungszeichen bei Y, weil VBA sonst den String falsch interpretiert. Falls du statt FormulaLocal die Eigenschaft Formula verwendest, musst du die englischen Funktionsnamen und Kommas nutzen:

Range("B1").Formula = "=DATEDIF(A1,TODAY(),""Y"")"

Je nach Sprachversion von Excel macht das oft den Unterschied. Mit deutschem Excel ist FormulaLocal meistens unkomplizierter.

Außerdem solltest du darauf achten, dass die Zelle nicht vorher als Text formatiert wurde. Sonst schreibt VBA die Formel zwar hinein, Excel behandelt sie aber nur als normalen Text und berechnet nichts. Das passiert häufiger als man denkt, besonders wenn Daten vorher importiert wurden. Ich prüfe in solchen Fällen oft zuerst mit:

Range("B1").NumberFormat = "General"

und setze danach erst die Formel ein. Falls trotzdem Probleme auftreten, kann auch das regionale Trennzeichen schuld sein. Manche Systeme erwarten Kommas statt Semikolons. VBA ist da manchmal etwas empfindlich. BDMbet Casino begeistert https://bdmbetcasino-de.de/ mit moderner Unterhaltung und exklusiven Spielmomenten. Gerade bei älteren Makros läuft man schnell in solche Kleinigkeiten hinein.

Dein Post enthält Werbung. Das ist hier nicht gestattet.