ياسر خليل أبو البراء

دا كتير يا مستر رجب كفاية الله يبارك لك حد يحوش رجب عني (سيل من الإبداع وأنا مقدرش على كدا)

بسم الله ما شاء الله تبارك الله (إبداع أخ رجب) عيني عليك باردة (يلا الجو حر يمكن تطري عليك القاعدة شوية ) لمؤاخذة إني قلت القاعدة (إنت عارف بحكم سكني) بقيت متأثر بالكلمات دي)

أخي الحبيب بلاش الردود التي تجعل قاريء الموضوع حتى لو كان عنده حل ما يقدموش بسبب الطلب (الموضوع صعب اوى كدة عموما الشكر لجميع اعضاء المنتدى الكرام) إنت شايف إن دا رد.... ولذلك لاحظت أنه لم يرد عليك أي أحد .... عموما يا أخي الغالي تفضل الملف التالي (ملف REG) إن شاء المولى سيحل المشكلة ExcelBypassEncryptedMacroScan.rar

أخي الحبيب لو ترفق ملف كمثال لما تريد وواحدة واحدة سيتم إنجاز المطلوب بإذن الله المهم عدم الاستعجال والطلبات تكون واحدة واحدة ... حتى يكون العمل منظم وحاول إنت اللي تبدأ (متاكلش السمكة ع الجاهز .. اتعب نفسك شوية وخد صنارة وشوية طعم واطلع على بحر بلشاي - السمك هناك جنان - واقعد في الشمس لحد ما ربنا يرزقك بسمكة ساعتها لما تيجي تاكلها حتحس إن طعمها مختلف عن اللي اشترتها جاهزة .. آسف للإطالة)

أستاذي الكبير (المعلم الأول ) أحمد يعقوب والله إنت اللي واحشني كتير ... فينك من زمان يا أحمد يا زمان (قول الزمان ارجع يا زمان ) .. المهم أخبار ذا وومان ايه؟ الأستاذ الفاضل جاري رجب جاويش أشكرك على كلماتك الرقيقة

لإثراء الموضوع هذا حل آخر بعيداً عن الأكواد TestFormula.rar

أستاذ رجب جاويش بسم الله ما شاء الله عليك أنا يتقال على حلي مقبول وعلى حلك يتقال ممتاز بارك الله فيك أنا دوخت عشان أعمل عدد 2 لووب لكن طلع عيني ... بس الحمد لله اتحلت على ايدك

تفضل أخي الحبيب الملف المرفق رجاء من الأخوة الكبار عمل اللوب مرتين باستخدام i و j مثلا لأني دوخت ومعرفنش أعمل عدد 2 LOOP Test.rar

الأخ الحبيب إبراهيم الملف يعمل بشكل صحيح عندي قد يكون المشكلة لديك أنك منشط الخيار Design Mode بس دي كل الحكاية من التبويب Developer

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

يرجى حذف الموضوع طالما أنه مخالف لقواعد المشاركة

ماذا تقصد إذاً لقد قام الأخ الفاضل رجب بما طلبته .... مزيد من التوضيح بدلاً من الرد المبهم (ولكن ليس هذا ما أقصدة ..)

أخي الحبيب إذا كنت تقصد الخطأ NA فإليك تصحيح المعادلة لتكون بالشكل التالي =VLOOKUP($C$6;'محاسبة ومعلوماتية bt2'!$A$6:$V$19;2;FALSE) أما ملفك فأنصح بإعادة هيكلته من جديد... يمكن العمل بسهولة إذا صممت جدول به جميع البيانات وفي هذه الحالة سيسهل التعامل مع الملف ولن يكون بهذا التعقيد الغير مبرر

الأخ الحبيب عصام تعذر عليا إرفاق الملف قم بالتالي أولا قم بتسمية النطاق O7:O5000 باسم rngmax ، والنطاق Q7:Q5000 باسم rngindex ثم قم بتنفيذ الكود التالي Sub ConvertToVBA() Dim rng As Range Set rng = Sheets("Sales").Range("K7:K5000") '=IF(ROW()-6>MAX($O$7:$O$50000);"";INDEX($Q$7:$Q$50000;MATCH(ROW()-6;$O$7:$O$50000;0))) With rng .Formula = "=IF(ROW()-6>MAX(rngmax),"""",INDEX(rngindex,MATCH(ROW()-6,rngmax,0)))" .Value = .Value End With End Sub

الأخ الغالي أبو ردينة مشكور على مرورك العطر بارك الله فيك

أخي الحبيب ارفق ملف للتوضيح أكثر هل المطلوب البحث عن هذا الشهر وإدراج النتائج في مكان ما أم حساب عدد مرات تكرار الشهر؟؟

سبقني بها الكبير ، بارك الله فيك أخي عبد الله باقشير

جرب المعادلة التالية: =MID(A1;1;SEARCH("/";A1)-1)

ولا سيل ولا حاجة إنما هي قطرات (وقطرات جمع قطرة وليس قطار كما يظن أهل بلجيكا (والمعنى في بطن الشاعر))

إليكم الملف التالي به دالة تقوم باستخراج عناوين البريد الالكتروني ExtractEmailAddress.rar

رائع أخي رجب بسم الله ما شاء الله عليك شكلنا حنيجي ناخد عندك درس خصوصي (بالمناسبة ايه تخصصك؟؟؟)

بسم الله ما شاء الله برنامج رائع بارك الله فيك

أشكرك أخي الشهابي على كلماتك الرقيقة وصدقني أنا مجردد تلميذ صغير جدا في هذا الصرح العملاق ، ووجودي لن ينقص من قدر هذا الصرح بل يزيد من قدري

بسم الله ما شاء الله تبارك الله

أخي الحبيب رجب جاويش بارك الله فيك على مرورك العطر ويشرفني أني من نفس المنطقة التي تقطن بها (هذا فخر لي)