Camel Case LibreOffice için işlev Calc

CAMELCASE() Açıklama

CAMELCASE() işlevi, sözcükleri değişken harflerle birleştirmek için tasarlanmıştır; yani sonuç olarak tek bir sözcük döndürülür, örneğin "camelCaseFunction".

Camel Case boşluklarla, tirelerle, alt çizgilerle veya büyük/küçük harflerle ayrılmış bir sözcük dizisini ayrı öğelere böler. Daha sonra küçük harfe çevrilen ilk kelime dışındakilerin hepsini büyük harfe çevirir ve tüm unsurları tek bir kelimede birleştirir.

CAMELCASE() işlevi, değişken adlarını kabul edilen kod yazma kurallarına göre dönüştürmek için programlamada yararlı olabilir (coding conventions) .

StarBASIC işlevin kodu Camel Case

Burada, farklı sözcükleri tek bir sözcükte birleştirebilen özel bir işlev oluşturmaya yönelik makro kod verilmiştir; burada mantıksal bölümler, LibreOffice Calc'de değişken bir durumla (Camel Case) ayrılacaktır.

Tools - Macros - Edit Macros... menüsünü açın, Module1'yi seçin ve aşağıdaki metni modüle kopyalayın:

Function CamelCase(ByVal str As String) As String
  'moonexcel.com.ua
  Dim words As Variant
  Dim i     As Integer
  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, " ")
    
  For i = LBound(words) + 1 To UBound(words)       
    words(i) = UCase(Left(words(i), 1)) & Mid(words(i), 2)       
  Next i
    
  CamelCase = Join(words,"")
End Function

Daha sonra Macro Editor'u kapatın, LibreOffice Calc'ye dönün ve yeni fonksiyonumuzu herhangi bir hücrede kullanın.

Uzantıyı kullanma

Bu özelliği de kullanabilirsiniz CAMELCASE() ücretsiz uzantıyı yükleyerek YouLibreCalc.oxt veya tam özellikli sürümü YLC_Utilities.oxt .

Bundan sonra bu fonksiyon LibreOffice Calc'de açılacak tüm dosyalarda mevcut olacaktır.