كود لاستبدال كلمة معينة بأخرى فى أكثر من نطاق

لوحة التميز الأسبوعي
العضو المتميز	المشرف المتميز	المراقب المتميز	المدير المتميز	الموضوع المتميز	القسم المتميز

أحمد يوسف	ali mohamed ali	لا تميز خلال هذه الفترة	YasserKhalil	تعديل عرض الأرقام كنسبة مئوية بالليست بوكس داخل الفورم	اكسيل اسئله واجابات

آخر المشاركات

أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .

الرئيسية

منتدى الاكسيل

اكسيل اسئله واجابات

كود لاستبدال كلمة معينة بأخرى فى أكثر من نطاق

السلام عليكم الإخوة الأفاضل مبارك على هذا المنتدى الجديد نسأل الله العظيم أن ينفع به ، ويبارك فى القائمين عليه، ويجزيهم ..

: لا يمكنك الرد على هذا الموضوع لا يمكنك إضافة موضوع جديد

أدوات الموضوع

أدوات الموضوع

تحميل محتوى الموضوع

عرض نسخة صالحة للطباعة

أرسل هذا الموضوع إلى صديق

: كود لاستبدال كلمة معينة بأخرى فى أكثر من نطاق

24-08-2017 12:27 صباحا

أباالحسن

عضو ماسي

تاريخ الإنضمام : 22-08-2017

رقم العضوية : 18

المشاركات : 306

الجنس :

تاريخ الميلاد : 7-7-1979

الدعوات : 1

يتابعهم : 4

يتابعونه : 17

قوة السمعة : 689

الاعجاب : 2

: السلام عليكم
الإخوة الأفاضل مبارك على هذا المنتدى الجديد
نسأل الله العظيم أن ينفع به ، ويبارك فى القائمين عليه، ويجزيهم خيرا

سؤالى بسيط للغاية
يوجد نطاقين بهما بيانات والمطلوب
1- أريد كود لاستبدال كلمة معينة بأخرى فى هذين النطاقين

2- أن ينفذ هذا الكود عندما تكون الورقة (Sheet2) هى النشطة

والملف المرفق به توضيح أكثر والمطلوب بالتفصيل

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب

كود لتغيير نص الى أخر.rar تحميل rar مرات التحميل :(12)
الحجم :(10.377) KB

تم تحرير الموضوع بواسطة :أباالحسن
بتاريخ:24-08-2017 12:30 صباحا

أعجبني أعجبك هذاإلغ اعجابي 0

: 24-08-2017 11:19 صباحا

[1]

radwan shelly

عضو

تاريخ الإنضمام : 23-08-2017

رقم العضوية : 62

المشاركات : 3

الجنس :

تاريخ الميلاد : 21-7-1957

يتابعهم : 0

يتابعونه : 0

قوة السمعة : 14

الاعجاب : 0

: كود لاستبدال كلمة معينة بأخرى فى أكثر من نطاق

: اخي المحترم
موضوعك لا يحتاج الى كود
وانت في برنامجك ... ظلل بالكامل النطاقين المراد تغيير الكلمات بهما .... ادخل الى Home ومنه الى Find & Select وأضغط على Find ... أكتب الكلمة دون المستوى أو أعمل Copy لها وضعها في مستطيل البحث :Find What ... أضغط على Replace وضع الكلمة المطلوب تغييرها وهي كلمة ضعيف في فراغ Replace With: ..... أضغط على Replace All .... ستتغير المعطيات الى المطلوب .... يمكنك تغيير ما تريد وهذا كل شيء.
تحياتي

أعجبني أعجبك هذاإلغ اعجابي 0

: 24-08-2017 02:21 مساء

[2]

أباالحسن

عضو ماسي

تاريخ الإنضمام : 22-08-2017

رقم العضوية : 18

المشاركات : 306

الجنس :

تاريخ الميلاد : 7-7-1979

الدعوات : 1

يتابعهم : 4

يتابعونه : 17

قوة السمعة : 689

الاعجاب : 2

: كود لاستبدال كلمة معينة بأخرى فى أكثر من نطاق

: الاخ radwan shelly
أعرف هذه الطريقة التى ذكرتها
لكن اريد كود لتنفيذها

أعجبني أعجبك هذاإلغ اعجابي 0

: 24-08-2017 09:05 مساء

[3]

YasserKhalil

مراقب عام

تاريخ الإنضمام : 21-08-2017

رقم العضوية : 3

المشاركات : 8997

الجنس :

تاريخ الميلاد : 1-10-1978

الدعوات : 22

يتابعهم : 0

يتابعونه : 460

قوة السمعة : 26664

الاعجاب : 671

: كود لاستبدال كلمة معينة بأخرى فى أكثر من نطاق

بارك الله فيك أخي العزيز رضوان ومشكور على مشاركتك الفعالة ونرجو الاستمرارية معنا في تقديم المزيد للأخوة الأعضاء

أخي الكريم أبا الحسن جرب الكود التالي

Sub Replace_In_Two_Ranges()

    Dim rng As Range

    

    Set rng = Union(Range("C5:C11"), Range("G5:G11"))

    rng.Replace "دون المستوى", "ضعيف", xlWhole

End Sub

أعجبني

: 25-08-2017 09:16 صباحا

[4]

أباالحسن

عضو ماسي

تاريخ الإنضمام : 22-08-2017

رقم العضوية : 18

المشاركات : 306

الجنس :

تاريخ الميلاد : 7-7-1979

الدعوات : 1

يتابعهم : 4

يتابعونه : 17

قوة السمعة : 689

الاعجاب : 2

: كود لاستبدال كلمة معينة بأخرى فى أكثر من نطاق

: تم التطبيق بنجاح
جزاكم الله خيرا

أعجبني أعجبك هذاإلغ اعجابي 0

: 25-08-2017 09:27 صباحا

[5]

YasserKhalil

مراقب عام

تاريخ الإنضمام : 21-08-2017

رقم العضوية : 3

المشاركات : 8997

الجنس :

تاريخ الميلاد : 1-10-1978

الدعوات : 22

يتابعهم : 0

يتابعونه : 460

قوة السمعة : 26664

الاعجاب : 671

: كود لاستبدال كلمة معينة بأخرى فى أكثر من نطاق

: وجزيت خيراً بمثل ما دعوت لي أخي العزيز أبا الحسن
تقبل وافر تقديري واحترامي

أعجبني أعجبك هذاإلغ اعجابي 0

: لا يمكنك الرد على هذا الموضوع لا يمكنك إضافة موضوع جديد

الكلمات الدلالية

لا يوجد كلمات دلالية ..

« نموذج إدخال وتعديل وحذف وبحث بيانات | كود لاختيار طابعة معينة والطباعة على حجم مخصص »

اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.

سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 07:07 مساء