كيفية تغيير حجم خط بالون التعليق في مستند Word؟

كما هو موضح أدناه ، إذا كنت تريد تكبير حجم خط بالون التعليق في مستند Word ، فماذا يمكنك أن تفعل؟ ستوضح لك هذه المقالة طريقتين لحل هذه المشكلة.

تغيير حجم خط بالون التعليق باستخدام وظيفة مضمنة في Word

قم بتغيير حجم خط بالون التعليق باستخدام كود VBA

تغيير حجم خط بالون التعليق باستخدام وظيفة مضمنة في Word

يمكنك تغيير حجم خط نص البالون مباشرةً في جزء كل الأنماط في Word. الرجاء القيام بما يلي.

1. اضغط على CTRL + قديم + تغير + S مفاتيح لفتح أنماط الجزء.

2. في ال أنماط جزء، انقر فوق العلاج. انظر لقطة الشاشة:

3. في الافتتاح خيارات جزء النمط نافذة، حدد كل الأنماط من حدد الأنماط لإظهارها قائمة منسدلة.

4. ثم اضغط OK للعودة إلى أنماط الجزء ، يرجى التمرير لأسفل للعثور على ملف نص بالون السطر ، انقر فوق لتوسيع القائمة المنسدلة ، ثم انقر فوق عدل. انظر لقطة الشاشة:

5. في ال تعديل النمط نافذة ، حدد حجم الخط الذي تريده في ملف التنسيق على النحو المبين أدناه لقطة الشاشة ، ثم انقر فوق OK .

6. أقفل ال أنماط الجزء.

ثم يتم تغيير حجم الخط لجميع بالونات التعليقات إلى الحجم المحدد.

ملاحظة: سيتم تطبيق الإعداد على جميع التعليقات في المستقبل.

قم بتغيير حجم خط بالون التعليق باستخدام كود VBA

سيقدم هذا القسم رمز VBA لمساعدتك في تغيير حجم خط بالون التعليقات في مستند Word بسهولة.

1. في المستند سوف تقوم بتغيير حجم خط بالون التعليق ، اضغط على قديم + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. في النافذة ، انقر فوق إدراج > وحدة. ثم انسخ رمز VBA أدناه في نافذة الوحدة النمطية.

كود فبا: قم بتغيير حجم خط بالون التعليق في Word

Sub SetCommentTextStyle()
'Updated by ExtendOffice 20181112
    Dim objComment As Comment
    Dim objDoc As Document
    Dim strFontName As String
    Dim strFontSize As String 
    Set objDoc = ActiveDocument
    strFontName = InputBox("Enter text font name here: ", "Font name")
    strFontSize = InputBox("Enter font size here: ", "Font size") 
    With objDoc
      For Each objComment In .Comments
        objComment.Range.Font.Name = strFontName
        objComment.Range.Style = ActiveDocument.Styles("Balloon Text Char")
      Next objComment
    End With
    ActiveDocument.Styles("Balloon Text").Font.Size = Val(strFontSize)
End Sub

3. اضغط على F5 مفتاح لتشغيل الكود.

4. في الأول كوتولس للكلمة في مربع الحوار ، أدخل خطًا جديدًا لتعليقك وانقر OK.

5. في الثانية كوتولس للكلمة في مربع الحوار ، اكتب حجم الخط حسب حاجتك وانقر OK.

ثم يتم تغيير حجم الخط لجميع بالونات التعليقات إلى الحجم المحدد في المستند الحالي.

---

أدوات إنتاجية Word الموصى بها

 

Kutools For Word - أكثر من 100 ميزة متقدمة لـ Word ، وفر وقتك بنسبة 50 ٪

• يمكن إجراء العمليات المعقدة والمتكررة لمرة واحدة في ثوانٍ.
• أدخل صورًا متعددة عبر المجلدات في مستند Word مرة واحدة.
• دمج ودمج ملفات Word المتعددة عبر المجلدات في ملف واحد بالترتيب الذي تريده.
• قسّم المستند الحالي إلى مستندات منفصلة وفقًا للعنوان أو فاصل المقطع أو معايير أخرى.
• قم بتحويل الملفات بين Doc و Docx و Docx و PDF ، ومجموعة من الأدوات للتحويلات والاختيارات الشائعة ، وما إلى ذلك ...

التفاصيل حمل التطبيق الآن شراء