Kebab Case LibreOffice 的函数 Calc

KEBABCASE() 描述

KEBABCASE() 函数旨在使用连字符组合单词，即它返回单个单词，例如“kebab-case-function”。

Kebab Case 分割由空格、连字符、下划线或大小写更改分隔的单词字符串，然后将这些单词转换为小写并使用连字符分隔符（“-”）将它们连接起来。

KEBABCASE() 函数在编程中非常有用，可根据可接受的代码编写约定转换变量名称 (coding conventions) 。

BASIC 函数代码 Kebab Case

以下是创建自定义函数的宏代码，该函数可以将文本转换为 LibreOffice Calc 中用连字符分隔的单个单词 (Kebab Case)。

打开菜单 Tools - Macros - Edit Macros...，选择 Module1 并将以下文本复制到模块中：

Function KebabCase(ByVal str As String) As String  
  'moonexcel.com.ua
  Dim words As Variant  
  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"))
      
  str   = LCase(str)  
  words = Split(str," ")              
      
  KebabCase = Join(words,"-")  
End Function

然后关闭 Macro Editor，返回到 LibreOffice Calc 并在任何单元格中使用我们的新函数。

使用 YouLibreCalc 扩展

您还可以通过设置扩展名“来使用函数 KEBABCASE() YouLibreCalc.oxt ”。此后，该功能将在所有在 LibreOffice Calc 中打开的文件中可用。