.NET-Anwendungen mit Excel erweitern

von Toni Patton am 15. November 2005 , 09:57 Uhr

Der VB.NET-Code in Listing C erzeugt ein neues Excel-Arbeitsblatt, fügt einige Zahlen ein und führt eine Berechnung aus.

Listing C

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles Button1.Click 
Dim excel As <a href="https://www.zdnet.de/unternehmen/microsoft/" title="Themenschwerpunkt: Microsoft">Microsoft</a>.<a href="https://www.zdnet.de/themen/office-2013/" title="Themenschwerpunkt: Microsoft Office">Office</a>.Interop.Excel.Application 
Dim wb As Microsoft.Office.Interop.Excel.Workbook 
Dim ws As Microsoft.Office.Interop.Excel.Worksheet 
Dim rng As Microsoft.Office.Interop.Excel.Range 
Try 
excel = New Microsoft.Office.Interop.Excel.Application 
wb = excel.Workbooks.Add() 
ws = wb.ActiveSheet() 
rng = ws.Range(„A1“) 
rng.Value = „BuilderAU.com.au“ 
rng = ws.Range(„A3“) 
rng.Value = „Quarter“ 
rng = ws.Range(„B3“) 
rng.Value = „Sales“ 
rng = ws.Range(„A5“) 
rng.Value = „First“ 
rng = ws.Range(„B5“) 
rng.Value = 1000.0 
rng = ws.Range(„A6“) 
rng.Value = „Second“ 
rng = ws.Range(„B6“) 
rng.Value = 2000.0 
rng = ws.Range(„A7“) 
rng.Value = „Third“ 
rng = ws.Range(„B7“) 
rng.Value = 4500.0 
rng = ws.Range(„A8“) 
rng.Value = „Fourth“ 
rng = ws.Range(„B8“) 
rng.Value = 4000.0 
rng = ws.Range(„A10“) 
rng.Value = „Total“ 
rng = ws.Range(„B10“) 
rng.Formula = „=@Sum(B5..B8)“ 
rng.Calculate() 
excel.Visible = True 
wb.Activate() 
Catch ex As COMException 
MessageBox.Show(„Error accessing Excel: “ + ex.ToString()) 
Catch ex As Exception 
MessageBox.Show(„Error: “ + ex.ToString()) 
End Try 
End Sub

Nur der Code für einen Button ist enthalten. (Listing D enthält den äquivalenten C#-Code.)

Listing D

private void button1_Click(object sender, System.EventArgs e) { 
Microsoft.Office.Interop.Excel.Application excel = null; 
Microsoft.Office.Interop.Excel.Workbook wb = null; 
Microsoft.Office.Interop.Excel.Worksheet ws = null; 
Microsoft.Office.Interop.Excel.Range rng = null; 
object missing = Type.Missing; 
try { 
excel = new Microsoft.Office.Interop.Excel.Application(); 
wb = excel.Workbooks.Add(missing); 
ws = (Microsoft.Office.Interop.Excel.Worksheet)wb.ActiveSheet; 
rng = ws.get_Range(„A1“, missing); 
rng.Value2 = „ZDNet.de“; 
rng = ws.get_Range(„A3“, missing); 
rng.Value2 = „Quarter“; 
rng = ws.get_Range(„B3“, missing); 
rng.Value2 = „Sales“; 
rng = ws.get_Range(„A5“, missing); 
rng.Value2 = „First“; 
rng = ws.get_Range(„B5“, missing); 
rng.Value2 = 1000.0; 
rng = ws.get_Range(„A6“, missing); 
rng.Value2 = „Second“; 
rng = ws.get_Range(„B6“, missing); 
rng.Value2 = 2000.0; 
rng = ws.get_Range(„A7“, missing); 
rng.Value2 = „Third“; 
rng = ws.get_Range(„B7“, missing); 
rng.Value2 = 4500.0; 
rng = ws.get_Range(„A8“, missing); 
rng.Value2 = „Fourth“; 
rng = ws.get_Range(„B8“, missing); 
rng.Value2 = 4000.0; 
rng = ws.get_Range(„A10“, missing); 
rng.Value2 = „Total“; 
rng = ws.get_Range(„B10“, missing); 
rng.Formula = „=@Sum(B5..B8)“; 
rng.Calculate(); 
excel.Visible = true; 
wb.Activate(); 
} catch (COMException ex) { 
MessageBox.Show(„Error accessing Excel: “ + ex.ToString()); 
} catch (Exception ex) { 
MessageBox.Show(„Error: “ + ex.ToString()); 
} }

Anmerkungen zum Code:

Mit der Add-Methode der Workbook-Eigenschaft des Application-Objekts wird eine neue Excel-Arbeitsmappe erzeugt. Dies erzeugt eine Arbeitsmappe mit einem leeren Arbeitsblatt.
Auf das aktuelle Arbeitsblatt wird über die ActiveSheet-Eigenschaft des Worksheet-Objekts zugegriffen.
Ein Range-Objekt wird verwendet, um mit einzelnen Zellen zu arbeiten. Auf die Zelle greift man über ihre Position auf dem Arbeitsblatt zu. Zum Beispiel wird in die erste Zelle ein Titel (ZDNet.de) für das Arbeitsblatt eingefügt (A1 = Spalte A, Zeile 1). Die Value-Eigenschaft des Range-Objekts wird verwendet, um Daten in die Zelle einzufügen.
Die Formular-Eigenschaft des Range-Objekts ermöglicht es, einer Zelle oder Gruppe von Zellen eine Formel zuzuordnen. In diesem Beispiel wird die Summe der zweiten Spalte von Werten angezeigt.
Die Calculate-Methode des Range-Objekts verarbeitet die Formel.

Zwischen der C#- und der VB.NET-Version gibt es einige Unterschiede. Die get_Range-Methode der Worksheet-Klasse wird verwendet, um das Range-Objekt in C# zu instanziieren. Zusätzlich weist die get_Range-Methode einen zweiten optionalen Parameter auf, daher wird der Type.Missing-Wert verwendet. Und schließlich muss das ActiveSheet-Objekt an die Worksheet-Klasse übergeben werden, um es verwenden zu können. Man muss auf solche Unterschiede vorbereitet sein, wenn man C# verwendet, um VBA COM-Objekte zu benutzen.

Die Umgebung

Einige Leser haben nach der Verwundbarkeit eines Benutzersystems bei Verwendung von Excel gefragt, doch die Beispiele in diesem Artikel wurden als Windows Form-basierte Anwendungen entwickelt. Die Umgebung, um die es hier geht, ist eine interne Anwendung, daher dürfte die Sicherheit kein so großes Problem sein, als wenn sie öffentlich zugänglich wäre. Die Verwendung von Excel über ASP.NET bringt tatsächlich ihre eigenen Probleme mit sich, was aber den Rahmen dieses Artikels sprengen würde.

Erweiterte Funktionalität

Wenn man Excel in eine .NET-Anwendung integriert, kann man innerhalb einer Anwendung leicht und schnell leistungsfähige Funktionalität zur Verfügung stellen. Die Rechen- und Präsentationsfunktionen von Excel bieten hierzu reichlich Optionen.

Inhalt

.NET-Anwendungen mit Excel erweitern

Neueste Kommentare

Noch keine Kommentare zu .NET-Anwendungen mit Excel erweitern

Vielen Dank für Ihren Kommentar.
Ihr Kommentar wurde gespeichert und wartet auf Moderation.

Schreibe einen Kommentar Antworten abbrechen

Neueste Kommentare

Noch keine Kommentare zu .NET-Anwendungen mit Excel erweitern

Vielen Dank für Ihren Kommentar.Ihr Kommentar wurde gespeichert und wartet auf Moderation.

Schreibe einen Kommentar Antworten abbrechen

Vielen Dank für Ihren Kommentar.
Ihr Kommentar wurde gespeichert und wartet auf Moderation.