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, kısa çizgilerle, 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
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 programında değişken bir büyük/küçük harfle (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
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.
"CAMELCASE() işlevini" uzantısını ayarlayarak da kullanabilirsiniz. YouLibreCalc.oxt ". Bundan sonra LibreOffice Calc'de açılacak tüm dosyalarda bu fonksiyon mevcut olacaktır.