TOP

Break Case LibreOffice Calc の関数

BREAKCASE() 説明

関数 BREAKCASE() は、テキストを区切り文字で別々の単語に分割するように設計されています。つまり、この関数は、「break case function」という形式で結果を返します。

Break Case は、まずスペース、ハイフン、またはアンダースコアで区切られた単語の文字列を個々の要素に分割し、次にすべての単語を小文字に変換し、空の区切り文字 (" ") を使用して 1 つの文に結合します。

BREAKCASE() 関数は、受け入れられたコード記述規則 (coding Conventions) に従って変数名を変換するプログラミングで役立ちます。


BASIC 関数のコード Break Case

以下は、LibreOffice Calc でテキストを個々の単語に分割できるカスタム関数 (Break Case) を作成するマクロ コードです。

メニュー Tools - Macros - Edit Macros... を開き、Module1 を選択して、次のテキストをモジュールにコピーします。

Function BreakCase(ByVal str As String) As String
  'moonexcel.com.ua
  Dim FCalc As Object
  
  FCalc = CreateUnoService("com.sun.star.sheet.FunctionAccess")
  
  str = Replace(str,"-"," ")
  str = Replace(str,"_"," ")  
  str = FCalc.callFunction("TRIM", Array(str))  
  str = FCalc.callFunction("REGEX", Array(str,"([:lower:])([:upper:])","$1 $2","g"))
  
  BreakCase = LCase(str)        
End Function

次に、Macro Editor を閉じ、LibreOffice Calc に戻り、任意のセルで新しい関数を使用します。