كيفية القيام بما يلي: القراءة من والكتابة إلى خصائص المستند

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

يمكنك تخزين خصائص المستند بالإضافة إلى المستند في تطبيقات Microsoft Office المذكورة أعلاه. توفر هذه التطبيقات عدداً من الخصائص المضمنة مثل الكاتب و العنوان والموضوع. يوضح هذا الموضوع كيفية تعيين خصائص المستند في Microsoft Office Excel و Microsoft Office Word.

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

إعداد خصائص المستند في Excel

للعمل مع الخصائص المضمنة في Excel استخدم الخصائص التالية:

• في مشروع على مستوى المستند، استخدم خاصية BuiltinDocumentProperties الخاصة بفئة ThisWorkbook.

• في مشروع على مستوى التطبيق، استخدم خاصية BuiltinDocumentProperties من الكائن Microsoft.Office.Interop.Excel.Workbook .

هذه الخصائص تقوم بإرجاع كائن DocumentProperties ,الذي هو مجموعة من الكائنات DocumentProperty . يمكنك استخدام خاصية Item الخاصة بالمجموعة لاسترداد خاصية معينة, إما حسب الاسم أو الفهرس داخل المجموعة.

يظهر مثال التعليمة البرمجية التالي كيفية تغيير خاصية Revision Number المضمنة في مشروع علي مستوى المستند.

لتغيير خاصية رقم المراجعة في Excel

1. قم بتعيين خصائص المستندات المضمّنة إلي متغير.

   Dim properties As Microsoft.Office.Core.DocumentProperties
   
   properties = DirectCast(Globals.ThisWorkbook.BuiltinDocumentProperties, _
       Microsoft.Office.Core.DocumentProperties)
   
   Dim prop As Microsoft.Office.Core.DocumentProperty
   prop = properties.Item("Revision Number")
   

   Microsoft.Office.Core.DocumentProperties properties;
   
   properties = (Microsoft.Office.Core.DocumentProperties)
       Globals.ThisWorkbook.BuiltinDocumentProperties; 
   
   Microsoft.Office.Core.DocumentProperty prop;
   prop = properties["Revision Number"]; 
   

2. قم بزيادة خاصية Revision Number بمقدار واحد.

   If prop.Value Is Nothing Then
       prop.Value = 1
   Else
       Dim revision As Integer
       If Integer.TryParse(prop.Value.ToString(), revision) Then
           prop.Value = revision + 1
           MessageBox.Show("Revision Number = " & revision)
       Else
           MessageBox.Show("Revision Number = invalid value")
       End If
   End If
   

   if (prop.Value == null)
   {
       prop.Value = 1;
   }
   else
   {
       int revision;
       if (int.TryParse((string)prop.Value, out revision))
       {
           prop.Value = revision + 1;
           MessageBox.Show("Revision Number = " + revision);
       }
       else
       {
           MessageBox.Show("Revision Number = invalid value");
       }
   }
   

إعداد خصائص المستند في Word

للعمل مع الخصائص المضمنة في Word، استخدم الخصائص التالية:

• في مشروع على مستوى المستند، استخدم خاصية BuiltInDocumentProperties الخاصة بفئة ThisDocument.

• في مشروع على مستوى التطبيق، استخدم خاصية BuiltInDocumentProperties من الكائن Microsoft.Office.Interop.Word.Document .

هذه الخصائص تقوم بإرجاع كائن DocumentProperties ,الذي هو مجموعة من الكائنات DocumentProperty . يمكنك استخدام خاصية Item الخاصة بالمجموعة لاسترداد خاصية معينة, إما حسب الاسم أو الفهرس داخل المجموعة.

يظهر مثال التعليمة البرمجية التالي كيفية تغيير خاصية Subject المضمنة في مشروع علي مستوى المستند.

لتغيير خاصية الموضوع(Subject)

1. قم بتعيين خصائص المستندات المضمّنة إلي متغير.

   Dim properties As Microsoft.Office.Core.DocumentProperties
   
   properties = DirectCast(Globals.ThisDocument.BuiltInDocumentProperties, _
       Microsoft.Office.Core.DocumentProperties)
   

   Microsoft.Office.Core.DocumentProperties properties;
   
   properties = (Microsoft.Office.Core.DocumentProperties)
       Globals.ThisDocument.BuiltInDocumentProperties; 
   

2. قم بتغيير الخاصية Subject إلي "بيان أبيض(Whitepaper)".

   ' Set the Subject property.
   properties.Item("Subject").Value = "Whitepaper"
   

   // Set the Subject property. 
   properties["Subject"].Value = "Whitepaper"; 
   

برمجة نشطة

تفترض الأمثلة أنك قمت بكتابة التعليمة البرمجية في فئة ThisWorkbook في مشروع على مستوي المستند في Excel، و فئة ThisDocument في مشروع علي مستوي المستند في Word.

على الرغم من أنك تعمل مع Word و Excel و الكائنات الخاصة بهم، تقوم Microsoft Office بتوفير قائمة من خصائص المستندات المضمنة المتوفرة. محاولة الوصول لخاصية غير محددة يقوم برفع استثناء.

راجع أيضًا:

المهام

كيفية القيام بما يلي: إنشاء وتعديل خصائص مستند مخصص

موارد أخرى

برمجة وظائف إضافية على مستوى التطبيق

برمجة تخصيصات علي مستوي مستند