Schreibt eine Formel in eine Zelle der aktiven Excel-Datei des festgelegten Excel-Objekts.
#Include <Excel.au3>
_ExcelWriteFormula($oExcel, $sFormula, $sRangeOrRow [, $iColumn = 1])
Parameter
| $oExcel | Ein Excel Objekt welches durch einen vorherigen Aufruf von _ExcelBookOpen() oder _ExcelBookNew() geöffnet wurde |
| $sFormula | zu schreibende Formel |
| $sRangeOrRow | Entweder ein A1 Bereich oder eine Integer Zeilennummer um es im Format R1C1 zu schreiben |
| $iColumn | [optional] Die Spalte in die geschrieben werden soll, falls das Format R1C1 verwendet wird (Standard = 1) |
Rückgabewert
| Erfolg: | 1 |
| Fehler: | 0 und setzt @error |
| @error: | 0 - Kein Fehler |
| 1 - festgelegtes Objekt existiert nicht | |
| 2 - Parameter außerhalb des Bereichs | |
| @extended: | 0 - Zeile außerhalb des Bereichs |
| 1 - Spalte außerhalb des Bereichs |
Bemerkungen
Keine.
Verwandte Funktionen
Beispiel
; ***************************************************************
; Beispiel 1 - Nach dem Öffnen einer Excel-Arbeitsmappe und dem Erhalt der Objekt-ID werden mittels einer Schleife
; Es werden ein paar Zellen mit Werten gefüllt und anschließend eine Formel eingetragen.
; *****************************************************************
#include <Excel.au3>
Local $oExcel = _ExcelBookNew() ; Erstellt eine neue Excel-Datei und macht diese sichtbar.
For $i = 0 To 20 ; Schleife
_ExcelWriteCell($oExcel, $i, $i, 2) ; Füllt ein paar Zellen mit Werten
Next
_ExcelWriteCell($oExcel, "Schnitt:", 22, 1) ; Schreibt in die Zelle [22,1]
_ExcelWriteFormula($oExcel, "=Mittelwert(Z1S2:Z20S2)", 22, 2) ; Formel für den Mittelwert einfügen (benutzt die Z1S1-Bezugsart)
; Es funktioniert aber auch mit _ExcelWriteCell():
; ***************************************************************
; Beispiel 2 - Schreibt mit Hilfe einer Schleife Daten in einen Zellbereich. Dann wird eine Formel eingegeben und die Datei gespeichert und geschlossen.
; *****************************************************************
For $i = 1 To 20 ; Schleife
_ExcelWriteCell($oExcel, $i, $i, 5) ; Schreibt den Wert von $i in die Zelle [$i,5]
Next
_ExcelWriteCell($oExcel, "Schnitt:", 22, 4) ; Schreibt in die Zelle [22,4]
_ExcelWriteCell($oExcel, "=Mittelwert(E1:E20)", 22, 5) ; Schreibt die Formel zur Berechnung des Mittelwerts der Daten in die Zelle [22,5] (benutzt die A1-Bezugsart, nicht Z1S1)
; Aufräumen
MsgBox(0, "Beenden...", "Drücke OK, um die Datei zu speichern und Excel zu beenden.")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; Nun wird die Datei in das Temp-Verzeichnis gespeichert. Falls notwendig werden existierende Dateien überschrieben.
_ExcelBookClose($oExcel) ; Und zum Schluss schließen wir die Datei.