Fügt eine Anzahl von Zeilen in die aktuelle Excel-Datei ein.
#Include <Excel.au3>
_ExcelRowInsert($oExcel, $iRow [, $iNumRows = 1])
Parameter
| $oExcel | Ein Excel Objekt welches durch einen vorherigen Aufruf von _ExcelBookOpen() oder _ExcelBookNew() geöffnet wurde |
| $iRow | Die Zeilenposition für das einfügen |
| $iNumRows | [optional] Die Anzahl der einzufügenden Zeilen |
Rückgabewert
| Erfolg: | 1 |
| Fehler: | 0 und setzt @error |
| @error: | 0 - Kein Fehler |
| 1 - festgelegtes Objekt existiert nicht | |
| 2 - festgelegte Zeilenposition ist ungültig |
Bemerkungen
Diese Funktion wird alle Zeilen die sich nach der eingefügten Zeile befinden nach unten schieben
Verwandte Funktionen
Beispiel
; ***************************************************************
; Beispiel 1 - Schreibt in einen Zellbereich unter Verwendung einer Schleife, fügt danach eine Zeile ein, dann wird gespeichert und die Datei geschlossen.
; *****************************************************************
#include <Excel.au3>
Local $oExcel = _ExcelBookNew() ; Erzeugt eine neue Mappe, macht sie sichtbar
For $i = 1 To 5 ; Schleife
_ExcelWriteCell($oExcel, $i, $i, 1) ; Schreibt in 5 Zellen (vertikale Richtung) die Werte 1 bis 5.
Next
ToolTip("Gleich gibts 'ne neue Zeile...")
Sleep(3500) ; Pause zum Beobachten
_ExcelRowInsert($oExcel, 1, 1) ; Fügt eine Zeile vor Zeile 1 ein
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.
; ***************************************************************
; Beispiel 2 - Schreibt in einen Zellbereich unter Verwendung einer Schleife, fügt danach Zeilen ein, dann wird gespeichert und die Datei geschlossen.
; *****************************************************************
#include <Excel.au3>
Local $oExcel = _ExcelBookNew() ; Erzeugt eine neue Mappe, macht sie sichtbar
For $i = 1 To 5 ; Schleife
_ExcelWriteCell($oExcel, $i, $i, 1) ; Schreibt in 5 Zellen (vertikale Richtung) die Werte 1 bis 5.
Next
ToolTip("Gleich gibts 3 neue Zeilen...")
Sleep(3500) ; Pause zum Beobachten
_ExcelRowInsert($oExcel, 2, 3) ; Fügt 3 Zeilen vor Zeile 2 ein.
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.