Office Excel 2010 XLS/XLSX bewaren

[selder]

Aan onze inkom hebben we een 55" LCD scherm hangen, dat via HDMI aanegsloten is op een normale Windows 7 PC.
Deze PC is zo ingesteld dat die automatisch aanlogt, en een VBS script "loop.vbs" (zie hieronder) start, waarin een powerpoint slideshow ((PPSX) gestart wordt, en waarbij de links automatisch geupdate worden.

Deze Slideshow haalt dus zijn gegevens uit een Excel bestand dat ook op die PC staat - dat zijn die links die geupdate moeten worden.

Nu werkt dat allemaal goed, alleen moet die XLSX steeds handmatig bewaard worden. Ik zoek een VBS (of iets anders) script, dat die XLSX opendoet, en terug bewaart. Iemand een idee?

Code: Selecteer alles

Const ppAdvanceOnTime = 2
Const ppShowTypeKiosk = 3
Const ppSlideShowDone = 100000000
 
Set objPPT = CreateObject("PowerPoint.Application")
objPPT.Visible = True
 
Set objPresentation = objPPT.Presentations.Open("C:\_Presentation\pc-inkom\Welcome.ppsx")
 
objPresentation.UpdateLinks
objPresentation.Slides.Range.SlideShowTransition.AdvanceTime = 10
objPresentation.Slides.Range.SlideShowTransition.AdvanceOnTime = TRUE
objPresentation.SlideShowWindow.View.PointerType = ppSlideShowPointerAlwaysHidden 
objPresentation.SlideShowSettings.AdvanceMode = ppAdvanceOnTime 
objPresentation.SlideShowSettings.ShowType = ppShowTypeKiosk
objPresentation.SlideShowSettings.StartingSlide = 1
objPresentation.SlideShowSettings.EndingSlide = _
objPresentation.Slides.Count

Set objSlideShow = objPresentation.SlideShowSettings.Run.View

Do Until objSlideShow.State = ppSlideShowDone
Loop

[defenderII]

bedoel je ppsx ipv xlsx
indien niet kan dit je mss al wat verder helpen http://www.rondebruin.nl/saveas.htm

[selder]

Nope, de PPSX werkt goed, het is de XLSX die vervelend doet...

[ Post made via mobile device ]

[ubremoved_539]

Nu werkt dat allemaal goed, alleen moet die XLSX steeds handmatig bewaard worden. Ik zoek een VBS (of iets anders) script, dat die XLSX opendoet, en terug bewaart. Iemand een idee?

Ik begrijp eigenlijk je probleem niet... je PowerPoint gebruikt Excel data... dus waarom moet die Excel gesaved worden ?

[Teebee]

ik begrijp het ook niet zo goed, maar indien je xlsx de links automatisch update, dan moet iemand of iets deze links toch updaten, en daarna opslaan?

[defenderII]

Selder die xlsx file wanneer wordt die geopend; voor dat de ppsx opent of zit dat in je ppsx file die met een vb(a) script de xlsx file opent. Want in je code komt komt er geen xlsx file voor. In de link die ik je eerder heb gestuurd vind je normaal de code die je zoekt om een xlsx file op te slaan.