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

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

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

يقتبس Chang المستقيم لعروض الأسعار المجعدة باستخدام Find and Replace

قم بتغيير علامات الاقتباس المستقيمة إلى عروض الأسعار المتعرجة باستخدام VBA

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

كوتولس للكلمة: دمج الذكاء الاصطناعي 🤖، أكثر من 100 ميزة متقدمة توفر 50% من وقت معالجة المستندات.تحميل مجانا

تبويب أوفيس: يقدم علامات التبويب المشابهة للمتصفح لبرنامج Word (وأدوات Office الأخرى)، مما يبسط التنقل بين المستندات المتعددة.تحميل مجانا


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

علامة تبويب Office: تجلب الواجهات المبوبة إلى Word وExcel وPowerPoint...
كلمة وسط الإعلان 100
تعزيز سير العمل الخاص بك الآن.      تفاصيل أكثر       تحميل مجانا

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

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

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

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

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

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


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

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

الخطوة 1: اضغط على "البديل، F11لفتح نافذة Microsoft Visual Basic for Application ؛

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

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

VBA التالي هو تغيير علامات الاقتباس المستقيمة إلى عروض الأسعار المتعرجة:

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

 

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

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

أفضل أدوات إنتاجية المكتب

كوتولس للكلمة - ارفع تجربة كلمتك مع أكثر 100 ميزات رائعة!

🤖 مساعد كوتولس AI: تحويل كتابتك باستخدام الذكاء الاصطناعي - توليد المحتوى  /  إعادة كتابة النص  /  تلخيص المستندات  /  الاستفسار عن المعلومات على أساس الوثيقة، كل ذلك داخل Word

📘 إتقان الوثيقة: تقسيم الصفحات  /  دمج المستندات  /  تصدير التحديد بتنسيقات مختلفة (PDF/TXT/DOC/HTML...)  /  دفعة تحويل إلى PDF  /  تصدير الصفحات كصور  /  طباعة ملفات متعددة في وقت واحد

تحرير المحتويات: بحث واستبدال دفعة عبر ملفات متعددة  /  تغيير حجم كافة الصور  /  تبديل صفوف وأعمدة الجدول  /  تحويل الجدول إلى نص

🧹 تنظيف سهل: اكتساح بعيدا مساحات اضافية  /  فواصل القسم  /  كل الرؤوس  /  مربعات النص  /  الارتباطات التشعبية  / لمزيد من أدوات الإزالة، توجه إلى موقعنا إزالة المجموعة

إدراجات إبداعية: إدراج الف فاصل  /  مربعات الاختيار  /  أزرار الراديو  /  رمز الاستجابة السريعة  /  الباركود  /  جدول الخط القطري  /  شرح المعادلة  /  صورة توضيحية  /  الجدول التوضيحي  /  صور متعددة  / اكتشف المزيد في أدخل المجموعة

🔍 التحديدات الدقيقة: يحدد بدقة صفحات محددة  /  الجداول  /  الأشكال  /  فقرات العناوين  / تحسين التنقل باستخدام الأكثر من ذلك حدد الميزات

تحسينات النجوم: انتقل بسرعة إلى أي مكان  /  الإدراج التلقائي للنص المتكرر  /  التبديل بسلاسة بين نوافذ المستندات  /  11 أدوات التحويل

؟؟؟؟ هل تريد تجربة هذه الميزات؟ يقدم Kutools for Word أ الإصدار التجريبي المجاني من 60 يومًا، بلا حدود! 🚀
 
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
The VBA code method for changing "straight" to "smart" quotes worked perfectly! Thank you!
This comment was minimized by the moderator on the site
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?
This comment was minimized by the moderator on the site
This is my problem too. Did you ever find an answer?
This comment was minimized by the moderator on the site
Your explanation for replacing in Find/Replace from instruction #2 on is completely incomprehensible.
This comment was minimized by the moderator on the site
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.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations