انتقل إلى المحتوى الرئيسي

رمز VBA لسرد جميع الوظائف الإضافية في Excel

في Excel ، يمكنك إضافة أو إدراج بعض الوظائف الإضافية للتعامل بشكل أفضل مع البيانات. كما نعلم ، يمكننا الانتقال إلى نافذة الخيارات لعرض جميع الوظائف الإضافية ، ولكن هل هناك أي طريقة لإدراج جميع الوظائف الإضافية في ورقة؟ الآن ، في هذا البرنامج التعليمي ، يوفر رمز VBA لسرد جميع الوظائف الإضافية في Excel.

1. صحافة ALT + F11 مفاتيح لتمكين نافذة Microsoft Visual Basic for Applications.

2. انقر إدراج > وحدة، والصق الكود أدناه في البرنامج النصي الفارغ.

فبا: سرد كافة الوظائف الإضافية

Public Sub AllAddins()
'UpdatebyKutools20191031
Dim xWSh As Worksheet
Dim xWB As Workbook
Dim xAddin As AddIn
Dim xCOMAddin As COMAddIn
Dim xFA, xFCA As Integer
Dim xI As Integer
Dim xStr As String
 
On Error Resume Next
Application.DisplayAlerts = False
xStr = "Addins List"
Set xWB = Application.ActiveWorkbook
Set xWSh = xWB.Worksheets.Item(xStr)
If Not xWSh Is Nothing Then
    xWSh.Delete
End If
Set xWSh = xWB.Worksheets.Add
xWSh.Name = xStr
xWSh.Range("A1").Value = "Name"
xWSh.Range("B1").Value = "FullName"
xWSh.Range("C1").Value = "Installed"
For xFA = 1 To Application.AddIns.Count
    Set xAddin = Application.AddIns(xFA)
    xI = xFA + 1
    Range("A" & xI).Value = xAddin.Name
    Range("B" & xI).Value = xAddin.FullName
    Range("C" & xI).Value = xAddin.Installed
Next xFA
xFA = (xFA + 2)
xWSh.Range("A" & xFA).Value = "Description"
xWSh.Range("B" & xFA).Value = "progID"
xWSh.Range("C" & xFA).Value = "Connect"
For xFCA = 1 To Application.COMAddIns.Count
    xI = xFCA + xFA
    Set xCOMAddin = Application.COMAddIns(xFCA)
    Range("A" & xI).Value = xCOMAddin.Description
    Range("B" & xI).Value = xCOMAddin.progID
    Range("C" & xI).Value = xCOMAddin.Connect
Next xFCA
Application.DisplayAlerts = True
End Sub

قائمة المستندات كلها تضاف في 1

3. صحافة F5 مفتاح لتشغيل التعليمات البرمجية ، تم إنشاء ورقة باسم قائمة الوظائف الإضافية مع جميع الوظائف الإضافية.
قائمة المستندات كلها تضاف في 2


عمليات أخرى (مقالات)

تعطيل الوظائف الإضافية عند بدء تشغيل Excel
ربما تكون قد قمت بتثبيت بعض الوظائف الإضافية في Microsoft Excel ، ولكنك الآن تحتاج إلى تعطيل وظيفة إضافية محددة عند بدء تشغيل Excel. كيفية حل هذه المشكلة؟ الطريقة في هذه المقالة يمكن أن تساعدك.

تصدير وحفظ كل ورقة عمل كمصنف جديد منفصل في Excel
لنفترض أنك تريد تصدير وحفظ ورقة عمل واحدة أو عدة أوراق عمل كمصنف جديد ، كيف ستتعامل معها؟ عادة يمكنك نسخ كل ورقة عمل ولصقها في مصنف جديد. ولكن هنا نقدم لك بعض الحيل المفيدة للتعامل معها:

أدخل أوراق العمل من مصنف آخر
قد تحتاج أحيانًا إلى استيراد أوراق عمل من مصنفات أخرى. إذا قمت بنسخ محتوى أوراق العمل ولصقه في المصنف الحالي ، فإنه يفقد بعض أنماط التنسيق ، مثل ارتفاع الصف ، وما إلى ذلك. توضح هذه المقالة بعض الطرق المفيدة لإدراج أوراق العمل من المصنفات الأخرى بسرعة مع فقدان البيانات وأنماط التنسيق.


  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
  • دمج الخلايا / الصفوف / الأعمدة وحفظ البيانات. تقسيم محتوى الخلايا ؛ اجمع الصفوف المكررة والمجموع / المتوسط... منع تكرار الخلايا؛ قارن النطاقات
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • المفضلة وإدراج الصيغ بسرعةوالنطاقات والمخططات والصور ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
  • تجميع الجدول المحوري حسب رقم الأسبوع واليوم من الأسبوع والمزيد ... إظهار الخلايا غير المؤمنة والمغلقة بألوان مختلفة قم بتمييز الخلايا التي لها صيغة / اسم
علامة تبويب kte 201905
  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations