Hallo Leute,
ich versuche im Moment ein Tool zu entwickeln, welches unteranderem auch Daten aus Excel-Tabellen benötigt.
Das reine auslesen funktioniert ohne Probleme!
Ich habe allerdings das Problem, dass gleichzeitig eine weitere Tabelle geöffnet werden soll in die gewisse Daten abgelegt werden sollen [nur Strings und Integer]. Die Datei soll bei jedem öffnen weiter geschrieben werden und dürfen sich nicht überschreiben.
Des Weiteren will ich möglichst ohne extra Importes arbeiten.
Mein erster Gedanke:
Bitte um Hilfe.
Wie kann ich es das Excel File öffnen und etwas in es schreiben und es dann speichern...
Danke
ich versuche im Moment ein Tool zu entwickeln, welches unteranderem auch Daten aus Excel-Tabellen benötigt.
VB.NET-Quellcode
- Private Sub ExcelAuslesen()
- MaterialTable.application.workbooks.Open(root & "\" & ComboBox1.SelectedItem.ToString & "\" & MaterialLabel.Text & "_Daten.xlsx")
- MaterialTable.Visible = False 'False die Tabelle wird im Hintergrung geöffnet.
- MaterialTable.application.sheets(1).Activate()
- MaterialTable.Range("A1").Select()
- ...
- '-------------------Median und Summe auslesen----------------------------------------------------------------------------------
- MedianLabel.Text = MaterialTable.Range("C" & intZähler).Value() 'schreiben des ausgelesenen Median Werts
- SummenLabel.Text = MaterialTable.Range("D" & intZähler).Value() 'schreiben des ausgelesenen Median Werts
- '---------------------------------------------------------------------------------------------------------------------------------------
- End Sub
Das reine auslesen funktioniert ohne Probleme!
Ich habe allerdings das Problem, dass gleichzeitig eine weitere Tabelle geöffnet werden soll in die gewisse Daten abgelegt werden sollen [nur Strings und Integer]. Die Datei soll bei jedem öffnen weiter geschrieben werden und dürfen sich nicht überschreiben.
Des Weiteren will ich möglichst ohne extra Importes arbeiten.
Mein erster Gedanke:
VB.NET-Quellcode
- Imports Microsoft.Office.Interop
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Dim xlApp As Excel.Application
- Dim xlBook As Excel.Workbook
- Dim xlSheet As Excel.Worksheet
- xlApp = New Excel.Application
- xlBook = xlApp.Workbooks.Add
- xlSheet = xlBook.Worksheets.Add
- xlApp.Application.Workbooks.Open("C:\Users\***\Desktop\test\testtabelle.xlsx")
- xlSheet.Cells(1, "a") = "Test1"
- xlSheet.Cells(2, "a") = "Test2"
- xlSheet.Cells(3, "a") = "Test3"
- xlBook.Close(SaveChanges:=True)
- xlApp.Quit()
- End Sub
Bitte um Hilfe.
Wie kann ich es das Excel File öffnen und etwas in es schreiben und es dann speichern...
Danke