Hallo zusammen.
Suche für einen Kumpel ein VBSript das je nachdem wie Spät es ist eine Datei startet also zb. zwischen 6 u.12 Uhr datei1 und zwischen 12 u.18 Uhr datei2. Wenn es zb.8Uhr ist wird datei1 gestartet.
Ich hoffe ich habe mich verständlich genug ausgedrückt.
Vielen Dank im vorraus.
drup TheTwister „VBSript Frage“
Schreiben nach Excel aus VBScript: für die Ansteuerung der Excel-Objekt (Worksheet, Zellen, auch Formatieren etc.) am besten in VBA in Excel selber schauen, ev. Makros aufzeichnen und schauen wie die aussehen, oder Hilfe in VBA in Excel.
Hier ein Beispiel für den WSH (VBScript):
Option Explicit
Dim appExcel
Dim xlsOutput
Dim ws
Dim einWort
Dim i
Dim WshShell
Dim fso
Dim sCurDir
Dim sPfad
' Instanz von Excel der Objektvariablen zuweisen
Set appExcel = CreateObject("Excel.Application")
' neues Excel-Objekt erstellen und sichtbar machen
Set xlsOutput = CreateObject("Excel.Sheet")
xlsOutput.Application.Visible = True
' Ojekt für aktuelles Tabellenblatt setzen
Set ws = xlsOutput.ActiveSheet
' Nach Excel schreiben
ws.Range("A1").Value = "Hier kommen die Zahlen 1 - 10:"
' Schreiben mit Loop:
For i = 1 to 10
ws.Cells(i+1, 1) = i
Next
' aktuelle Verzeichnis bestimmen
Set WshShell = CreateObject("WScript.Shell")
sCurDir = WshShell.CurrentDirectory
' Pfad zum Speichern zusammensetzen
Set fso = CreateObject("Scripting.FileSystemObject")
sPfad = fso.BuildPath(sCurDir, "DatenAusWord")
' neue Exceldatei speichern
xlsOutput.SaveAs (sPfad)
' Objekte freigeben
Set xlsOutput = Nothing
' ----------------------------------------------
