..|| Blog || Produkti/Storitve || MExcel || MDodatki || 300 nasvetov ||..

Posodobi povezavo v VBscripti

Preostalo o MS Pisarni

Posodobi povezavo v VBscripti

OdgovorNapisal/-a mb » Če jan 10, 2008 12:11 am

Pozdravljeni,

zanima me kakšen mora biti ukaz v VBscripti, da se bodo pri odpiranju xls. dokumenta posodobile povezave, saj me sedaj med izvajanjem sistem prikaže okno ali želim da se povezave posodobijo ali ne.

Koda v VB scripti:

Koda: Izberi vse
Dim objXL
Set objXL = WScript.CreateObject("Excel.Application")
objXL.Visible = false
objXL.WorkBooks.Open("Pot do datoteke xls")
objXL.run("ImeMakraVxlsDatoteki")
objXL.displayalerts = false
objXL.Save
objXL.Quit
Set objXL = Nothing


Po ukazu
Koda: Izberi vse
objXL.WorkBooks.Open("Pot do datoteke xls")

bi moral dodati ta potreben ukaz, da mi azurira povezave.

Prosim za pomoč!
LP; Boštjan
mb
 
Prispevkov: 57
Pridružen: Sr okt 26, 2005 7:40 pm



Matjazev.NET
 

OdgovorNapisal/-a admin » Če jan 10, 2008 9:33 am

Ne vem če bo pomagala, bi moral preizkusiti, a zagotovo vrstica ''objXL.displayalerts = false" sodi višje v makru.

Koda: Izberi vse
Dim objXL
Set objXL = WScript.CreateObject("Excel.Application")
objXL.Visible = false
objXL.displayalerts = false
objXL.WorkBooks.Open("Pot do datoteke xls")
.....


Opozorila sedaj nebi smeli videti, ali pa se bodo povezave tudi ustrezno posodobile ali ne pa ne vem.
lp,
Matjaž Prtenjak
Administrator
admin
Site Admin
 
Prispevkov: 3526
Pridružen: Sr jul 20, 2005 10:06 pm


Vrni se na Ostalo

Kdo je prisoten

Po forumu brska: 0 registriranih uporabnikov in 1 gost

cron