Unterordner dazu

2023-06-13 15:37:11 +02:00
parent d15fadc335
commit d091fe336e
59 changed files with 17458 additions and 0 deletions
@@ -0,0 +1,16 @@
+# Excel-Datei erstellen
+
+
+
+$DateiPfad = "R:\m.kraft\Excel Werte ändern\_Test\Neuer Ordner\Test-Datei.xlsx"
+
+$ExcelDatei = New-Object -ComObject excel.application
+$Mappe = $ExcelDatei.Workbooks.Item(1)  # Rechte Mappe
+$Blatt1 = $Mappe.WorkSheets.Add()
+$Blatt1.Name = "PLC Tags"
+$Blatt2 = $Mappe.WorkSheets.Add()       # Linke Mappe
+$Blatt2.Name = "Mappe2"
+$Mappe.SaveAs($DateiPfad)
+
+$Mappe.Close()
+$ExcelDatei.Quit()