VBScript nach Excel - Versionsgeschichte

Thomas: Kategorien eingefügt

2018-08-09T18:58:50Z

Kategorien eingefügt

← Nächstältere Version		Version vom 9. August 2018, 18:58 Uhr
Zeile 30:		Zeile 30:
	Set objExcel = Nothing		Set objExcel = Nothing
	</pre>		</pre>

			[[Kategorie:Basic]]
			[[Kategorie:VBScript]]
			[[Kategorie:Excel]]

Thomas am 9. August 2018 um 18:56 Uhr

2018-08-09T18:56:02Z

← Nächstältere Version		Version vom 9. August 2018, 18:56 Uhr
Zeile 7:		Zeile 7:
	Set objExcel = createobject("Excel.application")		Set objExcel = createobject("Excel.application")
	with objExcel		with objExcel
	.Visible = True 'zeigt Excel an ~~(GUI startet) falls diese Zeile~~ nicht ~~angegeben wird, startet Excel im Hintergrund~~		.Visible = True 'true zeigt Excel an, false nicht
	.Workbooks.add		.Workbooks.add
	.Cells(1, 1).Value = "~~Testeintrag~~"~~'schreibt in Zeile 1 Spalte 1~~ "~~Testeintrag~~"		.Cells(1, 1).Value = "Schreibt dies in die Zelle ""A1"" "
	.ActiveWorkbook.SaveAs(xlsxFilename)		.ActiveWorkbook.SaveAs(xlsxFilename)
	.Quit		.Quit
Zeile 24:		Zeile 24:
	Set objWorkbook = .Workbooks.Open (xlsxFilename)		Set objWorkbook = .Workbooks.Open (xlsxFilename)
	.Cells(1,1).Value="test"		.Cells(1,1).Value="test"
	wscript.echo .Cells(1,1).Value		wscript.echo .Cells(1,1).Value ' Liest den Wert aus der Zelle "A1"
	.ActiveWorkbook.Save		.ActiveWorkbook.Save
			.Quit
	end with		end with
	Set objExcel = Nothing		Set objExcel = Nothing
	</pre>		</pre>

Thomas: Die Seite wurde neu angelegt: „Aus VBScript kann eine Excel_Datei erzeugt und geschrieben werden. Dabe ist zu beachten, dass Visual Basic Script (VBScript) nicht immer die gleiche Syntax hat…“

2018-08-09T18:50:09Z

Die Seite wurde neu angelegt: „Aus VBScript kann eine Excel_Datei erzeugt und geschrieben werden. Dabe ist zu beachten, dass Visual Basic Script (VBScript) nicht immer die gleiche Syntax hat…“

Neue Seite

Aus VBScript kann eine Excel_Datei erzeugt und geschrieben werden. Dabe ist zu beachten, dass Visual Basic Script (VBScript) nicht immer die gleiche Syntax hat, wie Visual basich for Applications (VBA).

Excel Datei erzeugen:

<pre>
xlsxFilename ="c:\exceldatei.xlsx"
Set objExcel = createobject("Excel.application")
with objExcel
.Visible = True 'zeigt Excel an (GUI startet) falls diese Zeile nicht angegeben wird, startet Excel im Hintergrund
.Workbooks.add
.Cells(1, 1).Value = "Testeintrag"'schreibt in Zeile 1 Spalte 1 "Testeintrag"
.ActiveWorkbook.SaveAs(xlsxFilename)
.Quit
end with
Set objExcel = Nothing
</pre>

Aus Excel lesen / in Excel schreiben:

<pre>
xlsxFilename ="c:\exceldatei.xlsx"
Set objExcel = CreateObject("Excel.Application")
with objExcel
Set objWorkbook = .Workbooks.Open (xlsxFilename)
.Cells(1,1).Value="test"
wscript.echo .Cells(1,1).Value
.ActiveWorkbook.Save
end with
Set objExcel = Nothing
</pre>