السلام عليكم
لدي دالة وظيفتها البحث عن مجموعة كلمات موجودة في عمود في اكسل ويقوم باستبدال هذه الكلمات بكلمات او ارقام id بخطوة واحدة
المشكلة بان البحث غير حساس لحالة الاحرف فهو يقوم باستبدال الجزء المتطابق وترك الجزء الاخر ولا يستبدله
المطلوب تعديل الدالة بحيث تقوم بالبحث المتطابق تماما بدل الجزئي
الدالة هي
Private Sub CommandButton1_Click()
For i = 3 To 600
Worksheets("sheet1").Range("A3:A800").Select
Selection.Replace what:=Cells(i, 3).Value, Replacement:=Cells(i, 4).Value, _
lookat:=xlPart, SearchOrder:=xlByRows, MatchCase:=False
Next
Worksheets("sheet1").Cells(1, 1).Select
End Sub
السلام عليكم ورحمة الله وبركاتة قمت بالاطلاع على الكود وتم تعديلة الى المطلوب مرفق لك الملف جاهز يرجى الرد عند الاطلاع على الملف
وعليكم السلام أخي كريم قرأت نص المشروع وبصراحة الحل بسيط جدا جدا ، لا حاجة لأن تنشئ له مشروع أنا اكتب عرضي هذا لأقدم لك الحل وليس بهدف تقديم عرض . فقط في الجزء ...
السلام عليكم قرأت المطلوب في مشروعك بدقة وبإمكاني تنفيذه بإذن الله وضمن الفترة الزمنية فأنا متخصص وذو خبرة في التعامل مع برمجيات الإكسل والدوال الرياضية والمحاس...
السلام عليكم ورحمة الله وبركاته تستطيع إنجازها بدون الدالة أخى العزيز في أقل من ثوانى معدودة راسلنى بدون أى تعب. شكرا لك.
السلام عليكم ورحمة الله قمت بتجربة الدالة وعمل التعديل حتى يقوم بتغيير المتطابق مع الأخذ بعين الاعتبار حالة الحرف وعملت بشكل صحيح بامكانك مشاركي الملف وسأقوم با...
اسعد الله يومك اخى يمكننى حل المشكلة لك فى دقائق معددوه فمن اطلاعى على الكود المرفق فى وصف المشروع توصلت الى سبب المشكلة ويمكننى حلها لك بسرعة. تقبل تحياتى
مرحبا استاذي بامكاني تعديل المعادلة وانجازاها بالصورة الصحيحة ممكن تستعمل دالي vlockup مع بعض المعادلات الشرطية وسيتم البحث ومن ثم نقوم بالاستبدال
جاهز للقيام بالمطلوب... ادرس الهندسة المعلوماتية ولدي الخبرة في العمل على الاكسل والبرمجة... من فضلك تواصل معي لمناقشة التفاصيل وانجاز المطلوب...
السلام عليكم تواصل معي من فضلك حيث انني عضو هيئة تدريس وباقوم بتدرس هذه المادة للطلاب وساعدلها لك اولا ثم اقبل العرض