名前を付けてドキュメントを保存する

Sub ExampleSaveAs()
       ThisComponent.storeAsURL("file:///D:/SampleFolder/sample.ods", Array())
End Sub
  
名前を付けてドキュメントを保存する場合は、(カレントドキュメントの場合
は) ThisComponent オブジェクトの storeAsURL メソッドを使用する。
上記メソッドの第一引数に URL 形式のファイル名を指定すると、その
ファイル名でドキュメントが保存される。
ConvertToUrl 関数を使用すれば、通常のファイル名を指定することが
できる。
  
Sub ExampleSaveAs2()
       Dim strUrl As String
strUrl = ConvertToUrl("D:\SampleFolder\sample.ods")
       ThisComponent.storeAsURL(strUrl, Array())

End Sub