SSブログ
LibreOffice 4.1.1.2 ブログトップ

モジュールの追加 LibreOffice CalcBasic [LibreOffice 4.1.1.2]

モジュールの追加 LibreOffice CalcBasic

LibreOfficeCalcBaic_module.png

マクロの管理→モジュール→新規作成

 


LibreOffce Calc アドオン カレンダーを試す。 [LibreOffice 4.1.1.2]

LibreOffce Calc アドオン カレンダーを試す。

add-on_calendar_1.jpg

アドオンの入手とインストール

ttp://extensions.libreoffice.org/extension-center/calendar-for-calc/releases/4.0.1

↑で  pycalendar-4.0.1.oxt をクリックしてDL Firefoxの場合LibreOffice で開くを選択add-on_calendar_2.jpg

 拡張機能マネジャーが開きインストール

add-on_calendar_3.jpg

利用方法

add-on_calendar_4.jpg

ツール→アドオン→calendar

日付をダブルクリックで、選択セルに日付が入力される。

 

注意事項

拡張機能マネージャーで Python calender for Calc 4.01 を選択し、オプションで表示形式を変えても再起動後、警告がでて初期に戻る.(変更したまま表示されているが)

初期、yyyy-mm-dd 

add-on_calendar_5.jpg

add-on_calendar_6.jpg

間違いがあるかも?

追記

YYYY/MM/DD(AAA)にすればOKみたい

 

 


LibreOffce Calc Basic シートイベント ダブルクリックで行、列番号取得する実験 [LibreOffice 4.1.1.2]

LibreOffce Calc Basic シートイベント ダブルクリックで行、列番号取得する実験

calc_basic_DClick_1.jpg

手順

シートイベント用マクロの作成 ダブルクリック用

sub D_click()
 dim row as long
 dim column as long
'行番号取得 行番号はゼロから
    row = ThisComponent.CurrentController.getSelection().getRangeAddress().StartRow
'列番号取得 列番号はゼロから
    column= ThisComponent.CurrentController.getSelection().getRangeAddress().StartColumn
'メッセージボックスに表示、分かりやすく取得した番号+1
    msgbox "Row 行は " &  row+1 & chr(13) & "Column 列は " & Column +1
End Sub

calc_basic_DClick_5.jpg

 

シート名の所で右クリック、シートイベント選択

calc_basic_DClick_2.jpg

ダブルクリック イベントを選択し、マクロを選択

calc_basic_DClick_3.jpg

calc_basic_DClick_4.jpg

calc_basic_DClick_6.jpg

 

今日はここまで

 


LibreOffice Basic (マクロ)を試してみた。Msgboxの実験 [LibreOffice 4.1.1.2]

LibreOffice Basic (マクロ)を試してみた。Msgboxの実験

まだまだ手探り状態なので、取り合えずMsgBoxの「はい」「いいえ」ボタンの戻り値を調べてみた。

Sub msgbox2
Dim modorichi As Integer
modorichi = MsgBox("MsgBoxの実験" & chr(13) & "「はい」「いいえ」の戻り値を調べる" ,4+256+32,"Msgbox2" )
msgbox "押されたボタンの戻り値は " & modorichi & "です。"

End sub

Msgbox2はMsgBoxのタイトルバーに表示する文字
chr(13)は改行 VBAならvbVRLF

「はい」の戻り値   6
「いいえ」の戻り値  7

LibreOfice Msgbox_02.jpg

マクロの実行 ステップオーバー(イン)(1行ずつ実行)Shift+F8

 

参考資料

www.ja-fukuoka.or.jp/pdf/libre/ExceltoCalc.pdf 

 

 

 

 


LibreOffice 4.1.1.2 ブログトップ

この広告は前回の更新から一定期間経過したブログに表示されています。更新すると自動で解除されます。