ich brauche bitte Eure Hilfe.
Ich schreibe über ein Makro eine Formel als Text in eine Zelle
Formel: ='Fzg-Übersicht'!$F$6
Code:
zellinhalt = Right(ActiveCell.Formula, (Len(ActiveCell.Formula) - 1))
FSheet.Cells(ActiveCell.Row, ActiveCell.Column).Value = zellinhalt
Das funktioniert auch soweit und die Formel erscheint auch richtig.
Über eine Funktion will ich diese Formel wieder zurückschreiben.
Hier nun das Problem Excel erkennt das "'" nicht und bringt bei folgendem Code
ActiveCell.Formula = "=" & FSheet.Cells(ActiveCell.Row, ActiveCell.Column).Value
Einen Fehler!
Ich könnte jetzt einfach das "'" mit einsetzen, nur habe ich Formeln die dieses Zeichen nicht enthalten.
Zum Beispiel:
=[06allg.xls]Allgemein!D$2
=WENN($U31=0;0;$BG$27)
Was muss ich tun damit Excel das Zeichen richtig erkennt?
Danke Euch schonmal
Steffen Schmerler