Microsoft Excel ist eines der beliebtesten Programme für die Arbeit mit Tabellen. Wenn Sie Anwendungen in Delphi erstellen, müssen Sie häufig mit Daten in Excel arbeiten. Eine der Hauptaufgaben kann darin bestehen, eine Zeile von einem Blatt in ein anderes zu kopieren.
Delphi ist eine leistungsstarke integrierte Entwicklungsumgebung, mit der Sie eine Vielzahl von Softwareanwendungen erstellen können. Mit Delphi können Sie problemlos über das Objektmodell mit Excel interagieren. Es gibt mehrere Möglichkeiten, eine Zeile mit Delphi nach Excel zu kopieren.
Eine Möglichkeit, eine Zeile mit Delphi nach Excel zu kopieren, besteht darin, eine Methode zu verwenden Range und Eigenschaften Copy. Wenn Sie die Zeilennummer und das Arbeitsblatt kennen, können Sie den gewünschten Zellbereich angeben und in ein anderes Arbeitsblatt kopieren.
Ein anderer Weg ist die Verwendung der Methode Range und Eigenschaften Value. Auf diese Weise können Sie Zellenwerte ohne Formatierung und Formeln kopieren. Als Ergebnis wird die kopierte Zeichenfolge genau wie die ursprüngliche Zeichenfolge aussehen.
Daten in Excel eingeben
Sie können Daten mit Delphi in Excel eingeben, indem Sie das Excel-Objektmodell verwenden. Dazu müssen Sie die Excel-Schnittstelle verwenden.Eine Anwendung, die Zugriff auf Excel-Funktionen bietet und die Interaktion mit Excel ermöglicht.
Zunächst müssen Sie eine Instanz der Excel-Schnittstelle erstellen.Application, die die aktive Instanz von Excel darstellt. Dazu können Sie den folgenden Code verwenden:
var ExcelApp: Variant; begin ExcelApp := CreateOleObject('Excel.Application'); ExcelApp.Visible := True; end;
Nachdem Sie eine Instanz von Excel erstellt haben.Application Sie müssen eine Instanz der Arbeitsmappe erstellen, in die die Daten eingegeben werden. Dazu können Sie den folgenden Code verwenden:
var Workbook: Variant; begin Workbook := ExcelApp.Workbooks.Add; end;
Nachdem Sie die Arbeitsmappe instanziiert haben, können Sie das aktive Arbeitsblatt auswählen, in das Sie Daten eingeben möchten. Dazu können Sie den folgenden Code verwenden:
var Sheet: Variant; begin Sheet := Workbook.ActiveSheet; end;
Nachdem Sie das aktive Arbeitsblatt ausgewählt haben, können Sie Daten in die Zellen eingeben. Dazu verwenden Sie die Cells-Eigenschaft, die eine bestimmte Zelle darstellt. Um beispielsweise Daten in Zelle A1 einzugeben, können Sie den folgenden Code verwenden:
Sheet.Cells[1, 1].Value := 'Hello, World!';
Analog dazu können Sie Daten in andere Zellen eingeben. Bei Bedarf können Sie Schleifen verwenden, um Daten in mehrere Zellen gleichzeitig einzugeben.
Nachdem Sie die Daten eingegeben haben, müssen Sie die Arbeitsmappe speichern. Dazu können Sie den folgenden Code verwenden:
In diesem Beispiel wird die Arbeitsmappe in einer ExcelData-Datei gespeichert.xlsx im Stammverzeichnis von Laufwerk C.
Nachdem Sie die Arbeitsmappe gespeichert haben, können Sie die Excel-Instanz schließen und Ressourcen freigeben. Dazu können Sie den folgenden Code verwenden:
ExcelApp.Quit; ExcelApp := Unassigned;
Daher können Sie Daten mit Delphi in Excel mit dem Excel-Objektmodell eingeben. Sie müssen eine Instanz von Excel erstellen.Application, Arbeitsmappe, wählen Sie das aktive Arbeitsblatt aus und geben Sie die Daten in die Zellen ein. Nachdem Sie die Daten eingegeben haben, müssen Sie die Arbeitsmappe speichern, die Excel-Instanz schließen und Ressourcen freigeben.
Wie schreibe ich Daten in eine Zelle
Sie können den folgenden Code verwenden, um Daten mithilfe von Delphi in eine Zelle in Excel zu schreiben:
-
Erstellen Sie Excel-Objekte:
varExcelApp: Variant;ExcelWorkbook: Variant;ExcelWorksheet: Variant;beginExcelApp := CreateOleObject('Excel.Application');ExcelApp.Visible := True;ExcelWorkbook := ExcelApp.Workbooks.Add;ExcelWorksheet := ExcelWorkbook.ActiveSheet;varCellRow, CellColumn: Integer;beginCellRow := 1;CellColumn := 1;ExcelWorksheet.Cells[CellRow, CellColumn].Value := 'Текст для записи';Jetzt wissen Sie, wie Sie Daten mit Delphi in eine Zelle in Excel schreiben. Mit diesem Code können Sie eine Verbindung zu einer Excel-Instanz herstellen, eine neue Arbeitsmappe erstellen, das aktive Arbeitsblatt auswählen und die Daten in die angegebene Zelle schreiben. Sie können diesen Code an Ihre Bedürfnisse anpassen, indem Sie beispielsweise die Zeilennummer und die Spaltennummer sowie den zu schreibenden Wert ändern.
