最北端で暮らすSEのknowhow

人生の最終目標は気ままな老後生活

LibreOfficeで開いているドキュメントの場所を取得する

Dim fileURL As String
Dim directory As String
fileURL = ConvertFromURL(ThisComponent.getURL())
directory = Left(fileURL, Len(fileURL) - Len(ThisComponent.getTitle()))
MsgBox(directory)

hiro