SQB

اخي الكريم لا يوجد مرفق !

ممكن شرح اكثر بالنسبة للنقطة الاولى اي خانة تتكلم عنها المفروض تنتقل لأي مكان ؟

ظهرتلي الرسالة : "could not load the object because it is not available in this machine" بعدها فتح الملف مو مبين انه في مشكلة !

ممكن من خلال إضافة كود التقريب Round ( expression, [decimal_places] ) ولكن للأسف لم اطلع على كود الاستاذ عبدالله باقشي لمعرفة مكان اضافتها . مع جزيل الشكر

تم ذكر بعض البرامج من قبل الاخوة في هذا الرابط : http://www.officena.net/ib/index.php?showtopic=56105

اذا كان هذا قصدك ممكن يفيدك هذا الرابط : http://www.ozgrid.com/forum/showthread.php?t=73446

تقصد داخل خلية في آخر سطر بالصفحة ؟

للأسف عندي نص عربي راح أحاول بطريقة split يمكن تضبط لكن الملف يحتوي على أكثر من 13 ألف سطر شكرا أخي

تأكد من خصائص الفورم تلاقي "Showmodal" تأكد إنها False

الملف findkey.rar

اذا كنت نفس الشخص الموجود في هذا الرابط : http://www.mrexcel.com/forum/excel-questions/670980-replacement-problem-3.html فسؤالي نفس سؤالك من سنتيتن اتمنى تكون حصلت على إجابة

اعتقد كوني عضو جديد لا يمكنني إرفاق ملف ! حيث تظهر رسالة : findkey.xlsm غير مسموح برفع هذا النوع من الملفات لكن الكود هو كالتالي : Sub FindX() lastR1 = Sheets(1).Range("a50000").End(xlUp).Row Key = Sheets(1).Range("e2") For Each news In Sheets(1).Range("a2:i" & lastR1) findkey = InStr(news, Key) If findkey > 0 Then news.Offset(0, 1) = findkey End If Next End Sub بحيث العامود الأول يحتوي على الأخبار التي بها الكلمات " انعقدت الجمعية العمومية " ، " توقيع عقد مع شركة " والخانة e2 بها كلمة "عقد" والمطلوب إيجاد نتيجة للجملة الثانية فقط مع جزيل الشكر

السلام عليكم استخدم خاصية instr لتحديد موقع الكلمة المستخدمة من خلال الكود المستخدم . وبعد الفحص تبين أن كلمة "عقد" قد اعطت قيمة في كلمة "انعقدت" السؤال هل يوجد طرييقة لفحص الكلمة فقط دون أي زيادة ؟ مع جزيل الشكر