.odbファイル自体を閉じるマクロ。
Sub DocClose
If ThisComponent.getParent().isModified Then
rtn1 = msgbox("ドキュメントを閉じます。",4+48+256,"確認")
If rtn1 = 6 Then
ThisComponent.getParent().close(True)
End If
End If
End Sub
( LibreOffice 6.2.4.2 / Linux Mint Debian Edition3(LMDE3)”Cindy” )