Snake Case Função para LibreOffice Calc

SNAKECASE() Descrição

A função SNAKECASE() foi projetada para combinar palavras usando sublinhados, portanto retorna uma única palavra, por exemplo "snake_case_function".

Snake Case divide uma sequência de palavras separadas por espaços, hífens, sublinhados ou alterações de maiúsculas e minúsculas e, em seguida, converte essas palavras em minúsculas e as concatena com um separador de sublinhado ("_").

A função SNAKECASE() pode ser útil na programação para converter nomes de variáveis de acordo com convenções de escrita de código aceitas (coding conventions) .

BASIC código para função Snake Case

Aqui está o código de macro para criar uma função personalizada que pode converter texto em palavras individuais separadas por sublinhados (Snake Case) em LibreOffice Calc.

Abra o menu Tools - Macros - Edit Macros..., selecione Module1 e copie o seguinte texto no módulo:

Function SnakeCase(ByVal str As String) As String
  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, " ")            
    
  SnakeCase = Join(words,"_")
End Function

Em seguida, feche Macro Editor, retorne para LibreOffice Calc e use nossa nova função em qualquer célula.

Usando a extensão YouLibreCalc

Você também pode usar a função SNAKECASE() definindo a extensão " YouLibreCalc.oxt ". Depois disso, esta função estará disponível em todos os arquivos que serão abertos em LibreOffice Calc.