Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Formel =SUMME(F15+C16-D16) in VBA ausführen

Formel =SUMME(F15+C16-D16) in VBA ausführen
10.08.2007 15:01:15
Daniel
Hallo
ich hätte nochmals eine Frage betreffen der Codierung der Summenfunktion im VBA.
Wie kann ich die Formel "=SUMME(F15+C16-D16)" im VBA kodieren damit diejenige ausgeführt wird?
Gruss Daniel

Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel =SUMME(F15+C16-D16) in VBA ausführen
10.08.2007 15:07:00
Ramses
Hallo
X = Application.Worksheetfunction.Sum([F15]+[C16]+[D16])
Gruss Rainer

AW: Formel =SUMME(F15+C16-D16) in VBA ausführen
10.08.2007 15:19:00
Daniel
Hallo Rainer,
besten dank, aber ich sollte die Formel in eine leere Zelle einfügen, nicht die Summe
Gruss Daniel

AW: Formel =SUMME(F15+C16-D16) in VBA ausführen
10.08.2007 15:26:15
Ramses
Hallo
Sei mir nicht böse, aber bei VBA-Gut sollte dir der Makrorekorder ein Begriff sein.
Aufzeichnen beim Formel eintragen
Fertig
Gruss Rainer

Anzeige
AW: Formel =SUMME(F15+C16-D16) in VBA ausführen
10.08.2007 15:29:23
Daniel
Keineswegs bin ich dir böse..
Ich habe nur in einem schlauen Buche ein Bsp. analog meinem gesehen und wollte dies in meinen Code einbauen. Ich werde aber aus der Syntax nicht schlau
Code:
xlZelle.FormulaR1C1 = "=SUM(R[-" & lngZeile - 1 & "]C:R[-1])"
Gruss Daniel

Anzeige
AW: Formel =SUMME(F15+C16-D16) in VBA ausführen
10.08.2007 15:34:00
Ramses
Hallo
Diese Formel ist aber eine andere als deine Anforderung.
Das ist eine ganz einfache z1s1-Formel, welche auf die Zellen verweist die in einer entsprechenden Position von der aktiven Zelle sind.
Auch die Online-Hilfe gibt über Z1S1-Bezüge Auskunft
Ein weiterer Punkt der in der Online-Hilfe unter dem Suchbegriff "Formula" erklärt wird, ist folgender
****************************
Beispiel
Anwendung auf das Range-Objekt.
In diesem Beispiel wird die Formel für Zelle A1 in Sheet1 festgelegt.
Worksheets("Sheet1").Range("A1").Formula = "=$A$4+$A$10"
****************************
Die Funktionen sind natürlich in englischer Syntax zu schreiben.
Gruss Rainer

Anzeige
AW: Formel =SUMME(F15+C16-D16) in VBA ausführen
10.08.2007 15:52:00
Daniel
Besten Dank,
sowas suche ich eigentlich. Habe mich da wohl nicht so klar ausgedrückt.
Meine Formel müsste ich dann noch in etwa so anpassen
xlZelle.Formula = "= SUM(" & Range(xlZelle.Offset(lngZeile - 1, 0)" + C16 - D16)"
denn die Zelle verschiebt sich dann immer um eine Zeile nach unten
Gruss Daniel

Anzeige
wie wär's denn damit ?
10.08.2007 17:20:07
Matthias
Hallo
Probier es mal mit dieser Zeile:
ActiveCell.FormulaLocal = "=SUMME(" & "$F$15 + $C$16 - $D$16" & ")"
Userbild

AW: wie wär's denn damit ?
14.08.2007 08:52:00
Daniel
Hallo zusammen,
besten dank für alle eure Anregungen. Mittels diesem Forum bin ich ein kleines bisschen weiter gekommen
Gruss Daniel

Anzeige
AW: Formel =SUMME(F15+C16-D16) in VBA ausführen
10.08.2007 15:20:47
Matthias
Hallo
Eine weitere Variante wäre diese hier:
DeineZelle=Cells(15, 6) + Cells(16, 3) - Cells(16, 4)
Userbild

AW: Formel =SUMME(F15+C16-D16) in VBA ausführen
10.08.2007 16:16:01
Konni
Hallo Daniel,
probiers mal damit:

Sub Makro1()
Range("A1").Select
ActiveCell.FormulaR1C1 = "=SUM(R[14]C[5]+R[15]C[2]-R[15]C[3])"
End Sub


Das kannst Du mit dem Makrorecorder kann einfach bewerkstelligen:
Bevor Du den Recorder startest gibst Du die Formel in die betreffende Zelle ganz normal ein.
Starte nun den Recorder
Klicke die betreffende Zelle mit der Formel an.
In der Menueleiste wird die Formel angezeigt. - Markiere die Zeile
Betätige "Enter"
Beende den Recorder
Im Modul findest Du das Ergebnis (geht bei allen Formeln so!)
Viele Grüße: Konni

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Excel-Formel =SUMME in VBA ausführen


Schritt-für-Schritt-Anleitung

Um die Excel-Formel =SUMME(F15+C16-D16) in VBA auszuführen, kannst Du die folgende Vorgehensweise nutzen:

  1. Öffne den VBA-Editor: Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Erstelle ein neues Modul: Klicke im Menü auf Einfügen und wähle Modul.
  3. Füge den folgenden Code ein:
Sub FormelInVBA()
    Dim xlZelle As Range
    Set xlZelle = Worksheets("DeinBlattname").Range("A1") ' Ändere A1 auf die Zielzelle
    xlZelle.Formula = "=SUMME(F15+C16-D16)"
End Sub
  1. Führe das Makro aus: Drücke F5, um das Makro auszuführen. Die Formel wird jetzt in die angegebene Zelle eingefügt.

Häufige Fehler und Lösungen

  • Formel nicht ausgeführt: Wenn die Formel nicht ausgeführt wird, stelle sicher, dass der Blattname korrekt ist und die Zellen F15, C16 und D16 Werte enthalten.
  • Syntaxfehler: Überprüfe, ob Du die richtige Syntax verwendest. VBA verwendet die englische Schreibweise, daher sollte die Formel =SUM(F15+C16-D16) lauten.
  • Zellreferenzen nicht aktualisiert: Wenn Du die Formel in eine andere Zelle einfügen möchtest, achte darauf, die Zellreferenzen entsprechend zu aktualisieren.

Alternative Methoden

Falls Du die Excel-Formel in VBA auf eine andere Art und Weise verwenden möchtest, gibt es verschiedene Ansätze:

  1. Direkte Berechnung ohne Formel:
Sub SummeDirektBerechnen()
    Dim summe As Double
    summe = Cells(15, 6).Value + Cells(16, 3).Value - Cells(16, 4).Value
    Range("A1").Value = summe ' Ersetze A1 mit der gewünschten Zelle
End Sub
  1. Verwendung von R1C1-Referenzen:
Sub FormelR1C1()
    Range("A1").FormulaR1C1 = "=SUM(R[-14]C[5]+R[-15]C[2]-R[-15]C[3])"
End Sub

Diese Methoden ermöglichen es Dir, die SUMME-Funktion direkt zu berechnen oder sie in R1C1-Notation zu verwenden.


Praktische Beispiele

Hier sind einige praktische Beispiele, wie Du die Excel-Formel in VBA verwenden kannst:

  • Einfache Addition:
Sub EinfacheAddition()
    Range("B1").Formula = "=SUM(A1:A10)" ' Summiert die Werte in A1 bis A10
End Sub
  • Verwendung von absoluten und relativen Zellreferenzen:
Sub AbsoluteUndRelativeReferenzen()
    Range("C1").Formula = "=$A$1 + B1" ' $A$1 ist absolut, B1 ist relativ
End Sub

Diese Beispiele zeigen, wie Du mit Excel-Formeln in VBA arbeiten kannst, um unterschiedliche Berechnungen durchzuführen.


Tipps für Profis

  • Makrorekorder verwenden: Nutze den Makrorekorder, um Deine Formeln automatisch in VBA zu generieren. Dies kann Dir helfen, die Syntax zu lernen.
  • Fehlersuche: Wenn eine Formel nicht funktioniert, setze Haltepunkte im Code und überprüfe die Werte, um den Fehler zu finden.
  • VBA-Dokumentation: Nutze die VBA-Hilfe und Online-Dokumentationen, um mehr über WorksheetFunction und andere nützliche Funktionen zu lernen.

FAQ: Häufige Fragen

1. Wie kann ich eine Excel-Formel in VBA verwenden?
Du kannst eine Excel-Formel in VBA verwenden, indem Du die Formula oder FormulaR1C1 Eigenschaften des Range-Objekts nutzt.

2. Was ist der Unterschied zwischen Formula und FormulaR1C1?
Formula verwendet die A1-Notation (z.B. A1, B2), während FormulaR1C1 die R1C1-Notation verwendet, die auf der relativen Position der Zellen basiert.

3. Wie kann ich eine Formel in eine leere Zelle einfügen?
Verwende den Code Range("A1").Formula = "=SUMME(F15+C16-D16)", um die Formel in eine leere Zelle einzufügen, wobei A1 die Zielzelle ist.

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