اذهب الي المحتوي
أوفيسنا

مطلوب شرح الدالة (TEXTJOIN) وطريقة تثبيتهاعلى اوفيس 2013


الردود الموصى بها

اهلا بالجميع من مدراء الموقع وخبرائه واعضائه الكرام

تحية معطرة 

عندي سؤال 

اولا :كيف اقوم بإضافة الدالة TEXTJOIN على اكسل 2013 

حيث انها لا توجد فيه .مع اني وجدت الكود الخاص بها في موقع ميكروسوفت وهو هذا

Option Explicit
Function TEXTJOIN(delimiter As String, ignore_empty As String, ParamArray textn() As Variant) As String
    Dim i As Long
    For i = LBound(textn) To UBound(textn) - 1
        If Len(textn(i)) = 0 Then
            If Not ignore_empty = True Then
                TEXTJOIN = TEXTJOIN & textn(i) & delimiter
            End If
        Else
            TEXTJOIN = TEXTJOIN & textn(i) & delimiter
        End If
    Next
    TEXTJOIN = TEXTJOIN & textn(UBound(textn))
End Function

وقمت باضافتها حسب الكاتب لكن لم تنجح معي

والرجاء اخبروني ما وظيفة هذه الدالة؟

تم تعديل بواسطه قلم-الاكسل(عبدالعزيز)
رابط هذا التعليق
شارك

السلام عليكم اخي اذهب الى ديفلوبر و ادرج موديويل ثم انسخ الكود اعلاه بعدها اذهب الى اي خلية واكتب

=textjoin

تخرج لك الدالةو شكرا

لدي سؤال لك اخي ما وظيفة هذه الدالة

رابط هذا التعليق
شارك

انا عندي اوفيس 2016 و الدالة غير موجودة و لكن استطعت اضافتها واشتغلت عادي

مع العلم ان لا تتجاهل اي عنصر من عناصر الدالة 

هناك ملاحظة في موقع support.office ان هذه الدالة لا تتوفر الا من لديه اشتراك في office 365  مع اخر تحديث 

والله اعلم

 

 

 

 

 

 

  • Like 1
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information