Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Formel mit VBA eintragen

Formel mit VBA eintragen
03.04.2018 10:40:28
Erwin
Hallo in die Runde,
In der Zelle G7 findet folgende Berechnung statt:
=WENN(B7="";"";100/((B7+B8)/B7))
Der Nutzer darf diesen Vorschlagswert, wenn er möchte, überschreiben.
Folge ist, dass die Formel weg ist.
Über einen Button und VBA (geht ja nicht anders) möchte ich die Formel in G7 wieder eintragen können.
Der Makrorekorder hat folgendes aufgezeichnet:
Sub FormelWiederherstellen()
Range("G7").Select
ActiveCell.FormulaR1C1 = _
"=IF(RC[-5]="""","""",100*((RC[-5]+R[1]C[-5])/RC[-5]))"
End Sub
Ist das OK oder muss ich FormulaLocal benutzen, wenn ja wie?
Danke - Erwin
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel mit VBA eintragen
03.04.2018 10:47:28
Werner
Hallo Erwin,
warum sollte das nicht ok sein? Du solltest lediglich auf das Select verzichten und die Zelle direkt ansprechen.
Sub FormelWiederherstellen()
Range("G7").FormulaR1C1 = _
"=IF(RC[-5]="""","""",100*((RC[-5]+R[1]C[-5])/RC[-5]))"
End Sub
Wenn du FormulaLocal verwenden willst (kannst du natürlich auch), dann mußt du die deutsche Schreibweise der Formel verwenden.
Public Sub Formel_FormulaLocal()
Range("G7").FormulaLocal = "=WENN(B7="""";"""";100*((B7+B8)/B7))"
End Sub
Gruß Werner
Anzeige
AW: Formel mit VBA eintragen - Danke
03.04.2018 10:50:33
Erwin
Hallo Werner,
danke für's ausbessern und die 2. Version, das ging ja superschnell.
Grüße - Erwin
Gerne u. Danke für die Rückmeldung. o.w.T.
03.04.2018 10:54:28
Werner
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige