Re: [gebruikers] directory van het huidige document

[Ivo ten Hagen]

Bingo     Dim args() As New com.sun.star.beans.PropertyValue     myNewFile  = myPath & myFile     myURL=ConvertToUrl(myNewFile)     myDoc.StoreAsUrl(myURL,args()) Ik heb nog even geprobeerd de laatste drie stappen samen te voegen, maar dat werkt niet. Heren, dank! Ivo [EMAIL PROTECTED] schreef: 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 --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]