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

Forumthread: auch Summenformel anzeigen

auch Summenformel anzeigen
09.09.2004 13:37:25
Dennis
Hallo,
ich will eine Summe bilden, allerdings soll nicht nur die Summe erscheinen, sondern auch die Formel. Weiß jemand, was ich dafür abändern muß?
ActiveCell.FormulaR1C1 = WorksheetFunction.Sum(Range(Cells(1, 6), Cells(Cells(Rows.Count, 6).End(xlUp).Row, 6)))
MFG Dennis
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: auch Summenformel anzeigen
09.09.2004 14:23:52
Mac4
Hallo Dennis,
ich hatte das mal so gelöst (der Formeltext erscheint unterhalb der Ergebniszelle):

Sub test()
Dim Formel As String
Formel = "=Summe(F1:F" & Cells(Cells(Rows.Count, 6).End(xlUp).Row, 6) & ")"
ActiveCell.FormulaLocal = Formel
ActiveCell.Offset(1, 0) = "'" & Formel
End Sub

Marc (aus Köln)
Anzeige
AW: auch Summenformel anzeigen
Dennis
Hi Marc,
irgendwie will es nicht richtig funktionieren.
Rem Summe in Spalte F
x = Range("F65536").End(xlUp).Row + 9
Cells(x, 6).Select
ActiveCell.FormulaR1C1 = WorksheetFunction.Sum(Range(Cells(1, 6), Cells(Cells(Rows.Count, 6).End(xlUp).Row, 6)))
Die Formel soll in cells(x, 6) neben dem Ergebnis erscheinen, weil ich in der Tabelle
noch Zahlen manuell eingeben will, so dass die Summe immer aktuell ist.
Anzeige
AW: auch Summenformel anzeigen
10.09.2004 09:00:04
Mac4
Hi,
versuchs mal so:

Sub test()
Dim Formel As String
Formel = "=Summe(F1:F" & [F65536].End(xlUp).Row & ")"
ActiveCell.FormulaLocal = Formel
ActiveCell = ActiveCell & " " & WorksheetFunction.Substitute(Formel, "=", "")
End Sub

Marc (aus Köln)
Anzeige
;

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