مشاركة عبر

الإرشادات التفصيلية: إنشاء الجدول المخصص باستخدام الشريط XML

  • مقالة

ينطبق على

تنطبق المعلومات الموجودة في هذا الموضوع فقط على أنواع المشاريع وإصدارات Microsoft Office التالية: لمزيد من المعلومات، راجع الميزات المتوفرة بواسطة تطبيقات Office و نوع المشروع.

نوع المشروع

  • مشروعات على مستوى المستند

  • مشروعات على مستوى التطبيق

إصدار Microsoft Office

  • Excel 2007 و Excel 2010

  • InfoPath 2010

  • Outlook 2007 و Outlook 2010

  • PowerPoint 2007 و برنامج PowerPoint 2010

  • Project 2010

  • Visio 2010

  • Word 2007 و Word 2010

توضح هذه الإرشادات التفصيلية كيفية إنشاء علامة تبويب "شريط" مخصصة باستخدام عنصر الشريط (XML).

توضح هذه الإرشادات التفصيلية المهام التالية:

  • إضافة أزرار إلى تبويب الوظائف الإضافية. تبويب الوظائف الإضافية هو علامة التبويب الافتراضية المعرفة في ملف XML الشريط.

  • أتمتة Microsoft Office Word باستخدام الأزرار الموجودة على تبويب الوظائف الإضافية.

ملاحظة

قد يعرض جهاز الكمبيوتر الخاص بك أسماء أو مواقع مختلفة لبعض عناصر واجهة مستخدم Visual Studio في الإرشادات التالية. يحدد كل من إصدار Visual Studio لديك والإعدادات المستخدمة هذه العناصر. لمزيد من المعلومات، راجع العمل مع إعدادات.

المتطلبات الأساسية

تحتاج إلى المكونات التالية لاستكمال هذه الإرشادات التفصيلية:

-

إصدار لـ Visual Studio 2010 يشمل أدوات مطوري Microsoft Office. لمزيد من المعلومات، راجع [تكوين كمبيوتر لتطوير حلول Office](bb398242\(v=vs.100\).md).
  • Microsoft Office Word 2007 أو Word 2010. :

ارتباط إلى فيديو للحصول على عرض فيديو توضيحي ذي صلة، راجع كيف يمكنني القيام بما يلي: استخدام مصمم "الشريط" لتخصيص الشريط في Excel ؟.

إنشاء المشروع

الخطوة الأولى هي إنشاء مشروع وظيفة Word إضافية. سوف تقوم لاحقاً بتخصيص تبويب الوظائف الإضافية لهذا المستند.

لإنشاء أحد المشروعات الجديدة

إنشاء تبويب الوظائف الإضافية

لإنشاء تبويب الوظائف الإضافية ،قم بإضافة عنصر الشريط (XML) إلى المشروع الخاص بك. لاحقًا في هذه الإرشادات التفصيلية سوف تقوم بإضافة بعض الأزرار إلى علامة التبويب هذه.

لإنشاء تبويب الوظائف الإضافية

  1. في مشروع قائمة ، انقر فوق إضافة عنصر جديد .

  2. في مربع الحوار أضف عنصر جديد ، حدد الشريط (XML) .

  3. قم بتغيير اسم الشريط الجديد إلى MyRibbonثم انقر فوق أضف‏‎ .

    يتم فتح الملف MyRibbon.cs أو MyRibbon.vb في المصمم. يتم أيضاً إضافة ملف XML يسمى MyRibbon.xml للمشروع الخاص بك.

  4. في مستكشف الحلول ، انقر بزر الماوس الأيمن فوق ThisAddin.cs أو ThisAddin.vb، ثم انقر فوق عرض التعليمة البرمجية .

  5. قم بإضافة التعليمة البرمجية التالية للفئة ThisAddin . تتجاوز هذه التعليمة البرمجية الطريقة CreateRibbonExtensibilityObject و تقوم بإرجاع فئة XML الشريط لتطبيق Office.

    Protected Overrides Function CreateRibbonExtensibilityObject() As  _
Microsoft.Office.Core.IRibbonExtensibility
    Return New MyRibbon()
End Function

    protected override Microsoft.Office.Core.IRibbonExtensibility CreateRibbonExtensibilityObject()
{
    return new MyRibbon();
}

  6. في مستكشف الحلول، انقر بزر الماوس الأيمن فوق مشروع MyRibbonAddIn ثم انقر فوق بناء. تحقق من بناء المشروع بدون أخطاء.

إضافة أزرار إلى تبويب الوظائف الإضافية.

الهدف من هذه الوظائف الإضافية هو إعطاء المستخدمين طريقة لإضافة النص المتداول وجدول خاص بالمستند النشط. لتوفير واجهة المستخدم، قم بإضافة زرين إلى تبويب الوظائف الإضافية عن طريق تعديل ملف XML الشريط. لاحقًا في هذه الإرشادات التفصيلية، سيتم تعريف أساليب رد الاتصال للأزرار. لمزيد من المعلومات حول ملف XML الشريط ، راجع شريط XML.

لإضافة أزرار إلى تبويب الوظائف الإضافية.

  1. في مستكشف الحلول، انقر على بزر الماوس الأيمن على MyRibbon.xml ثم انقر فوقفتح.

  2. استبدل محتويات العنصر tab بـ XML التالية. يغير هذا الـ XML تسمية مجموعة عناصر التحكم الافتراضية إلى Content‎، ثم يقوم بإضافة زرين جديدين بتسميات إدراج نص (Insert Text) و إدراج جدول (‎Insert Table) .

    <tab idMso="TabAddIns">
    <group id="ContentGroup" label="Content">
        <button id="textButton" label="Insert Text"
             screentip="Text" onAction="OnTextButton"
             supertip="Inserts text at the cursor location."/>
        <button id="tableButton" label="Insert Table"
             screentip="Table" onAction="OnTableButton"
             supertip="Inserts a table at the cursor location."/>
    </group>
</tab>

أتمتة المستند باستخدام الأزرار

يجب عليك إضافة أساليب رد الاتصال onAction للأزرار إدراج نص و إدراج جدول لتنفيذ الإجراءات عندما يقوم المستخدم بالنقر عليها. للحصول على معلومات إضافية حول أساليب رد الاتصال لعناصر الشريط، راجع شريط XML.

لإضافة أساليب رد الاتصال للأزرار

  1. في مستكشف الحلول أنقر بزر الماوس الأيمن فوق MyRibbon.cs أو MyRibbon.vb، ثم انقر فوق فتح.

  2. قم بإضافة التعليمة البرمجية التالية إلى أعلى الملف MyRibbon.cs أو MyRibbon.vb . تقوم هذه التعليمة البرمجية بإنشاء أسم مستعار لمساحة الأسماء Microsoft.Office.Interop.Word.

    Imports Word = Microsoft.Office.Interop.Word

    using Word = Microsoft.Office.Interop.Word;

  3. قم بإضافة الأسلوب التالي إلى الفئة MyRibbon . هذا هو أسلوب رد الاتصال لزر إدراج نص الذى يضيف سلسلة إلى المستند النشط في الموقع الحالي للمؤشر.

    Public Sub OnTextButton(ByVal control As Office.IRibbonControl)
    Dim currentRange As Word.Range = Globals.ThisAddIn.Application.Selection.Range
    currentRange.Text = "This text was added by the Ribbon."
End Sub

    public void OnTextButton(Office.IRibbonControl control)
{
    Word.Range currentRange = Globals.ThisAddIn.Application.Selection.Range;
    currentRange.Text = "This text was added by the Ribbon.";
}

  4. قم بإضافة الأسلوب التالي إلى الفئة MyRibbon . هذا هو أسلوب رد الاتصال للزر إدراج جدول الذى يضيف جدولاً إلى المستند النشط في الموقع الحالي للمؤشر.

    Public Sub OnTableButton(ByVal control As Office.IRibbonControl)
    Dim missing As Object = System.Type.Missing

    Dim currentRange As Word.Range = Globals.ThisAddIn.Application.Selection.Range
    Dim newTable As Word.Table = Globals.ThisAddIn.Application.ActiveDocument.Tables.Add( _
               currentRange, 3, 4)

    ' Get all of the borders except for the diagonal borders.
    Dim borders() As Word.Border = New Word.Border(6) {}
    borders(0) = newTable.Borders(Word.WdBorderType.wdBorderLeft)
    borders(1) = newTable.Borders(Word.WdBorderType.wdBorderRight)
    borders(2) = newTable.Borders(Word.WdBorderType.wdBorderTop)
    borders(3) = newTable.Borders(Word.WdBorderType.wdBorderBottom)
    borders(4) = newTable.Borders(Word.WdBorderType.wdBorderHorizontal)
    borders(5) = newTable.Borders(Word.WdBorderType.wdBorderVertical)

    ' Format each of the borders.
    For Each border As Word.Border In borders
        border.LineStyle = Word.WdLineStyle.wdLineStyleSingle
        border.Color = Word.WdColor.wdColorBlue
    Next
End Sub

    public void OnTableButton(Office.IRibbonControl control)
{
    object missing = System.Type.Missing;
    Word.Range currentRange = Globals.ThisAddIn.Application.Selection.Range;
    Word.Table newTable = Globals.ThisAddIn.Application.ActiveDocument.Tables.Add(
    currentRange, 3, 4, ref missing, ref missing);

    // Get all of the borders except for the diagonal borders.
    Word.Border[] borders = new Word.Border[6];
    borders[0] = newTable.Borders[Word.WdBorderType.wdBorderLeft];
    borders[1] = newTable.Borders[Word.WdBorderType.wdBorderRight];
    borders[2] = newTable.Borders[Word.WdBorderType.wdBorderTop];
    borders[3] = newTable.Borders[Word.WdBorderType.wdBorderBottom];
    borders[4] = newTable.Borders[Word.WdBorderType.wdBorderHorizontal];
    borders[5] = newTable.Borders[Word.WdBorderType.wdBorderVertical];

    // Format each of the borders.
    foreach (Word.Border border in borders)
    {
        border.LineStyle = Word.WdLineStyle.wdLineStyleSingle;
        border.Color = Word.WdColor.wdColorBlue;
    }
}

اختبار الوظائف الإضافية

عند تشغيل المشروع، يفتح Word و علامة التبويب باسم الوظائف الإضافية تظهر على الشريط. انقر فوق إدراج نص و أزرار إدراج جدول على تبويب الوظائف الإضافية لاختبار التعليمة البرمجية.

لاختبار الوظائف الإضافية الخاصة بك

  1. اضغط F5 لتشغيل مشروعك.

  2. تأكد من أن تبويب الوظائف الإضافية مرئي على الشريط.

  3. انقر فوق علامة التبويب الوظائف الإضافية (Add-Ins).

  4. تأكد من أن مجموعة المحتوى مرئية على الشريط .

  5. انقر فوق زر إدراج نص في مجموعة المحتوى.

    تتم إضافة سلسلة إلى المستند في الموقع الحالي للمؤشر.

  6. انقر فوق زر إدراج جدول في مجموعة المحتوى.

    يتم إضافة جدول إلى المستند في الموقع الحالي للمؤشر.

الخطوات التالية

يمكنك معرفة المزيد حول كيفية تخصيص واجهة مستخدم Office من هذه المواضيع:

راجع أيضًا:

المهام

الإرشادات التفصيلية: إنشاء علامة تبويب مخصصة باستخدام مصمم الشريط

المبادئ

شريط XML

موارد أخرى

نظرة عامة على الشريط