#excel #office356 #openoffice #vbs #vba
Pytanie - dlaczego po wykonaniu skryptu z harmonogramu zadań (cscript.exe + kod vbs) kolumny z walutami przestawiają mi się na typ niestandardowy, gdzie cyfry z minusem są w nawiasie i na czerwono?
Tutaj kod którego używam w VBS - za każdym razem muszę poprawiać ale przy kolejnym obliczaniu znów wraca do tego formatu.
`Dim s
Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("adres do pliku")
s = objExcel.ActiveWorkbook.BuiltinDocumentProperties("Last Save Time")
objExcel.Application.Visible = true
objExcel.Visible = true
objExcel.DisplayAlerts = False
objExcel.AlertBeforeOverwriting = False
objWorkbook.RefreshAll
objExcel.Calculate
Do Until objExcel.CalculationState = xlDone
objWorkbook.ActiveWorkbook.RefreshAll
Loop
objExcel.ActiveWorkbook.Save
Do Until objExcel.ActiveWorkbook.BuiltinDocumentProperties("Last Save Time") > s
Loop
objWorkbook.Saved = True
objExcel.ActiveWorkbook.Close
objExcel.Quit
Set objWorkbook = Nothing
Set objExcel = Nothing`
Wygląda to tak jak na obrazku
. Serio cos nowego wyszlo? Sprawdzę