كيف يمكن البحث عن نص معين واستبداله داخل التعليقات (الملاحظات) في Excel؟
تُعد دالة البحث والاستبدال في Excel أداةً قويةً لتحديث محتوى الخلايا بسرعة، لكنها لا تنطبق مباشرةً على الملاحظات—وهي الاسم البديل للتعليقات التقليدية قبل إصدار Excel 2019. يتساءل العديد من المستخدمين عما إذا كان بالإمكان استخدام نفس الوظيفة للبحث عن نصٍّ معين داخل ملاحظات Excel واستبداله. ويُظهر لك هذا الدليل كيفية تنفيذ عملية البحث والاستبدال في الملاحظات بفعالية، مما يوسع قدرتك على إدارة جميع جوانب جداول البيانات الخاصة بك وتحسينها.
استخدام كود VBA لـ البحث والاستبدال النص داخل التعليقات (الملاحظات)
أداة مفيدة لـ البحث والاستبدال النص داخل التعليقات (الملاحظات) بسرعة وبسهولة
استخدام كود VBA لـ البحث والاستبدال النص داخل التعليقات (الملاحظات)
في Excel، يمكنك استخدام كود VBA التالي للبحث عن نص واستبداله في جميع الملاحظات. على سبيل المثال، سيتم استبدال النص "2011" بالنص "2012" في جميع ملاحظات ملف Excel.
1. انقر فوقالمطور > Visual Basic، وستظهر نافذة جديدة باسمMicrosoft Visual Basic for Applications. بعد ذلك، انقر فوقإدراج > وحدة نمطية، ثم أدخل كود VBA التالي في الوحدة النمطية:
كود VBA: البحث والاستبدال النص في جميع الملاحظات في Excel
Sub ReplaceNotes()
'Updated by Extendoffice 2024/07/25
Dim cell As Range
Dim wks As Worksheet
Dim sFind As String
Dim sReplace As String
Dim sNote As String
' Define the text to find and replace
sFind = "2011"
sReplace = "2012"
' Loop through each worksheet in the active workbook
For Each wks In ActiveWorkbook.Worksheets
For Each cell In wks.Cells
If cell.NoteText <> "" Then
sNote = cell.NoteText
If InStr(sNote, sFind) > 0 Then
sNote = Replace(sNote, sFind, sReplace)
cell.NoteText Text:=sNote, Start:=1, Length:=Len(cell.NoteText)
End If
End If
Next cell
Next wks
End Sub
2. بعد ذلك، انقر فوق الزر
لتشغيل الكود، وسيتم استبدال جميع العبارات "2011" في جميع الملاحظات بـ "2012" في المصنف بأكمله.
أداة مفيدة لـ البحث والاستبدال النص داخل التعليقات (الملاحظات) بسرعة وبسهولة
يمكننا بسرعة البحث عن نصّ وتعديله في جميع الملاحظات باستخدام أداةKutools لـ Excel’s البحث/استبدال نص الملاحظة.
إذا كنت قد ثبّتَّ Kutools لـ Excel، فيمكنك بسهولة البحث عن نص واستبداله في جميع الملاحظات داخل Excel.
1. انقر فوقKutools > المزيد > البحث/استبدال نص الملاحظة.
2. في مربع الحوارالبحث/استبدال نص الملاحظة:
- (1.) حدد النطاق الذي تريد تطبيق هذه الأداة عليه، ويمكنك تحديدورقة العمل الحاليةأوجميع الأوراق؛
- (2.) أدخل النص (2011) الذي تريد استبداله في مربعالبحث عن نص في الملاحظات، ثم أدخل النص الجديد (2012) الذي ترغب في استخدامه في مربعاستبدال بـ.
3. ثم انقر على الزراستبدال. سيتم استبدال جميع العبارات «2011» بـ «2012» داخل التعليقات في ورقة العمل النشطة. راجع لقطات الشاشة:
 |  |  |
مقالات ذات صلة:
- تغيير تنسيقات جميع التعليقات في الخلايا
- تغيير اسم مؤلف جميع التعليقات
- سرد جميع التعليقات إلى ورقة عمل جديدة أو المصنف
- إظهار أو إخفاء جميع التعليقات ومؤشرات التعليقات في Excel
- تحويل محتويات الخلايا إلى تعليقات في Excel
- تحويل التعليقات إلى محتويات خلايا في Excel
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل