【マクロ】OpenOfficeの日付をYYYY/MM/DDにするマクロ

OpenOffice/表計算ドキュメントでは、繰り返し使う機能のうち日付の書式変更が有ります。

自分にとって見やすい書式は西暦+二桁の月表示+二桁の日にちで、YYYY/MM/DDとなります。

それに伴って、プルダウン/書式/数/日付/書式コード/ YYYY/MM/DDと6個の操作が必要です。

マクロでは一個の操作ですみ、省力化になりますから効果的だと思います。

例によって「マクロの記録」から作成したものです。

Sub Main
End Sub
sub date
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "NumberFormatValue"
args1(0).Value = 36
dispatcher.executeDispatch(document, ".uno:NumberFormatValue", "", 0, args1())
end sub

ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー

ページトップに戻る↑　　　　　　　　　　　　　　　　　　　　　　　　　　　ページ一番下へ↓