Kebab Case الدالة لـ LibreOffice Cal

YLC

Online

KEBABCASE() الوصف

تم تصميم الدالة KEBABCASE() لدمج الكلمات باستخدام واصلة، أي أنها تُرجع كلمة واحدة، على سبيل المثال "kebab-case-function".

Kebab Case يقسم سلسلة من الكلمات المفصولة بمسافات أو واصلات أو شرطات سفلية أو تغييرات في حالة الأحرف، ثم يحول تلك الكلمات إلى أحرف صغيرة ويربطها بفاصل واصلة ("-").

يمكن أن تكون الدالة KEBABCASE() مفيدة في البرمجة لتحويل أسماء المتغيرات وفقًا لاتفاقيات كتابة التعليمات البرمجية المقبولة (coding conventions) .

BASIC كود الدالة Kebab Case

إليك رمز الماكرو لإنشاء وظيفة مخصصة يمكنها تحويل النص إلى كلمات فردية مفصولة بواصلات (Kebab Case) في LibreOffice Calc.

افتح القائمة 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.