Citeren Cor Nouws <[EMAIL PROTECTED]>: > Hallo Ivo, > > Ivo ten Hagen wrote: > > > Ha Cor, > > Ik heb jouw aanwijzingen uitgeprobeerd, dank. Echter, hoe ik ook > > probeer, de macro blijft hangen op myDoc.StoreAsURL > > Ivo > > myNewFile = ConvertToUrl(myPath & myFile) > myDoc.StoreAsUrl(myNewFile, args()) > > doet het wel. Heb nog even niet uitgezocht wat de logica daarachter is. > Het verschil zit'm in: Dim args(0) As .....
Doordat je een nul opgeeft tussen de haakjes creeer je een array die je dan ook zult moeten vullen: Dim FileProperties(0) As New com.sun.star.beans.PropertyValue FileProperties(0).Name = "Overwrite" FileProperties(0).Value = True myDoc.StoreAsUrl(myNewFile, FileProperties(0) ) Maar je kunt het ook weglaten. Jef Knoors > vr. groet, > Cor > > > --------------------------------------------------------------------- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > -- _____________________________________________________________________ Versatel ADSL Gratis. De voordelen van gratis internet met de snelheid van ADSL. Zonder abonnementskosten en zonder vast contract. Je betaalt alleen voor de tijd online. Nu zonder aansluitkosten en met gratis modem. Bestel snel op www.versatel.nl. --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
