LibreOfficeでひらがなをカタカナへ、またはカタカナをひらがなへ変換する自作関数（tohirahana(), tokatakana()）を作りました。

Spreadsheetで普通の関数と同じように使えます。

作った後で、LibreOffice自身にもともとひらがな・カタカナ変換の機能があることに気づく。がぁーーーん！！

ということで需要があまりないと思いますが、せっかく使ったので公開します。

コード

Function toKatakana(ByVal str as string) as string
dim kana as string
kana = strConv(str, 16)
toKatakana = kana
End Function

Function toHiragana(ByVal str as string) as string
dim kana as string
kana = strConv(str, 32)
toHiragana = kana
End Function

使用方法

LibreOfficeのText DocumentやSpreadsheetなど、任意のアプリを開き、上記画像が示しているように、「Tools→Macros→Organize Macros→Basic」を開きます。日本語化されたメニューなら、「ツール→マクロ→マクロの整理→ベーシック」になるでしょうか。

すると上記のようなダイアログが表示されます。右側にこの例のように、すでに何か入っていることがあるかもしれませんが、ある場合はは「Edit」を、ない場合は「Add」 を押します。

すでに入っているコードを削除し、上記のコードを貼り付けて画面を閉じます。これでSpreadsheetで普通の関数と同じように使えるようになります。

黄天化でした。今回は以上です。