نصيحة: اللغات الأخرى مترجمة من قبل Google. يمكنك زيارة English نسخة من هذا الرابط.
تسجيل الدخول
x
or
x
x
التسجيل
x

or

كيفية تغيير يقتبس على التوالي إلى يقتبس مجعد في كلمة؟

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

تشانغ يقتبس على التوالي إلى اقتباسات مجعد مع البحث واستبدال

تغيير يقتبس على التوالي إلى اقتباسات مجعد مع فبا


السهم الأزرق الفقاعة اليمنى تغيير يقتبس على التوالي إلى اقتباسات مجعد مع البحث واستبدال

حار
رائعة حقا! استخدم علامات التبويب الفعالة في Word (Office) مثل Chrome و Firefox و Internet Explorer الجديد!

اقرأ أكثر. تحميل مجاني

قبل التطبيق بحث واستبدال، عليك الذهاب ل خيارات التصحيح التلقائي لإلغاء تحديد "يقتبس على التوالي" مع "يقتبس الذكية" خانة الاختيار.

في ورد شنومكس، خيارات التصحيح التلقائي هو تحت أداة شريط. وفي كلمة شنومكس، وتطبيق خيارات التصحيح التلقائي بالضغط > الخيارات > إثبات > خيارات التصحيح التلقائي. هنا نأخذ كلمة شنومكس / شنومكس على سبيل المثال:

الخطوة شنومكس. انقر > خيار > إثبات > خيارات التصحيح التلقائي > أوتوفورمات أس يو تايبوحدد "يقتبس على التوالي" مع "يقتبس الذكية" خانة الاختيار. انظر لقطة الشاشة:

الخطوة شنومكس. انقر الصفحة الرئيسية > استبدل في ال تحرير مجموعة أو الصحافة كترل + H لعرضهم بحث واستبدال الحوار، وأدخل 'or '' in تجد ما مربع، وأدخل ' or ''in استبدال صندوق. انظر لقطة الشاشة:

الخطوة شنومكس. انقر استبدال الكل.

إذا كنت ترغب في استبدال جميع يقتبس مجعد مع يقتبس على التوالي، يرجى مسح "يقتبس على التوالي" مع "يقتبس الذكية" خانة الاختيار).


السهم الأزرق الفقاعة اليمنى تغيير يقتبس على التوالي إلى اقتباسات مجعد مع فبا

لاستبدال جميع يقتبس على التوالي مع اقتباسات مجعد في ورد شنومكس باستخدام فبا، الرجاء النقر قم بتقديم> خيار > إثبات ثم انقر التصحيح التلقائي الخيارات وحدد "يقتبس على التوالي" مع "يقتبس الذكية" خانة الاختيار كما يلي أولا. (ملاحظة:: إذا كنت ترغب في استبدال جميع يقتبس مجعد مع يقتبس على التوالي، يرجى مسح "يقتبس على التوالي" مع "يقتبس الذكية" خانة الاختيار).

الخطوة شنومك: اضغط على "البديل، F11"لفتح إطار ميكروسوفت فيسوال باسيك للتطبيق؛

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

الخطوة شنومك: ثم انقر فوق يجري زر لتطبيق فبا.

فبا التالية هي لتغيير يقتبس على التوالي إلى اقتباسات مجعد:

Sub ChangeDoubleStraightQuotes()
'Update 20131107
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = """"
.Replacement.Text = """"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord =False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

فبا التالية هي لتغيير ونقلت مجعد إلى يقتبس على التوالي:

Sub ReplaceSmartQuotes()
Dim vFindText As Variant
Dim vReplText As Variant
Dim i As Long
vFindText = Array("[^0145^0146]", "[^0147^0148]")
vReplText = Array("^039", "^034")
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Forward = True
.Wrap = wdFindContinue
.MatchWholeWord = True
.MatchWildcards = True
For i = LBound(vFindText) To UBound(vFindText)
.Text = vFindText(i)
.Replacement.Text = vReplText(i)
.Execute Replace:=wdReplaceAll
Next i
End With
End Sub



أوصت كلمة أدوات الإنتاجية

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

  • يمكن إجراء العمليات المعقدة والمتكررة لمرة واحدة خلال ثوانٍ.
  • إدراج صور متعددة عبر المجلدات في مستند Word مرة واحدة.
  • دمج ودمج ملفات Word متعددة عبر مجلدات في واحد بالترتيب المطلوب.
  • قسّم المستند الحالي إلى مستندات منفصلة وفقًا للعنوان أو فاصل المقاطع أو معايير أخرى.
  • تحويل الملفات بين Doc و Docx و Docx و PDF ، ومجموعة من الأدوات للتحويلات والتحديدات الشائعة ، وما إلى ذلك ...
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Sri · 11 months ago
    The VBA code method for changing "straight" to "smart" quotes worked perfectly! Thank you!
  • To post as a guest, your comment is unpublished.
    no name · 1 years ago
    My problem is that I have work normally in German but have an English document, which I marked as "English". Then I did find&replace and it converted them to lower " and upper " as it would happen in German. I looked at all the settings but I couldn't find it. I changed the dictionary language and everything else I could find to English... any idea?
  • To post as a guest, your comment is unpublished.
    Bill Smith · 5 years ago
    Your explanation for replacing in Find/Replace from instruction #2 on is completely incomprehensible.
    • To post as a guest, your comment is unpublished.
      Dustin · 4 years ago
      I think I found the explanation on another page. If you simply do a replace all and ask it to replace either single quotes or double quotes with the exact same symbol, it will go through and apply your autocorrect rules, including to replace straight quotes with smart quotes. So it should update those all to smart quotes as it goes.