/ Published in: Visual Basic

Expand |
Embed | Plain Text
set app = createobject("Excel.Application") app.Visible = true set oClientBook=app.Workbooks.Open("Datei.xls") app.Run "PB_SmokeTest.testMengen","20" & "", optionenString & "" oClientBook.Worksheets("Deckblatt").range("D28").value = "Lief" & i & " " & teststring oClientBook.save() oClientBook.close(true
You need to login to post a comment.