نايف - م

جميل جدا هو المطلوب شكرا

شكرا أخي ياسر سؤال هل يمكن أن أحدد الخلايا التي أريد تلوينها - بدلا من السطر كله - يعني من الخلية A للخلية H في صف الخلية النشطة

جزاك الله خيرا بالأنتظار

أستاذ ياسر أنت بتأمر أمر مو معقول - طلب بسيط لشخص أفضاله على كل المنتدى تكرم عيونك يا أخي و شكرا للوقت اللي عم تفقده من أجل تعليمنا

أي يا أخي يا استاذ ياسر وين تتمة الموضوع

أستاذي الكريم شكرا جزيلا للشرح الرائع و المبسط بالصبر ننتظر الدرس التالي أستاذي ملاحظة : لم أستطع الرد على موضوعك باستخدام الموزيلا و لم استطع الأعجاب و لم استطع كتابة موضوع جديد اضطررت أن استخدم الكروم

أنا أفتقدالأخ ياسر عسى الغياب خير من يعرف السبب ؟؟

جميلة هذه الفكرة

ما شاء الله ما هذا الأبداع أستاذ ياسر بارك الله فيك و بعملك و وفقك بكل عمل تقوم به أنت رائع

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

يا سلام شو هالكود أستاذ ياسر روعة يعني : نضع الكود في مودول ثم نكتب الرقم المراد البحث عنه ثم نشغل الكود

السلام عليكم طلبي اليوم متعلق بالبحث ب ليست بوكس فيها عدة أعمدة و أحدد أنا خيار البحث في أي عمود لا أريد الأنتقال للقيمة - أنما أريد فلترة الليست بوكس بحيث تضم كل القيم المشابهة للقيمة المبحوث عنها كنت قد استعنت بالأستاذ ياسر أبو البراء في فلترة ليست بوكس بعمود واحد و يتم اضافة القيم ل الليست بوكس عند التفعيل نبحث في التكست بوكس الأبيض( اسم المستوع ) لنحدد أدويته في الليست البوكس ثم نحدد اسم الدواء في التكست بوكس الأحمر ليتم فلترة الليست بوكس للقيم المشابهة المصنف1.rar

تمام و هو المطلوب سيحان الله يا أخي أنا لا أتعلم و استمتع بالكود الا اذا كان من انتاجك يكون على مقاس طلبي بالتمام حصلت على كود اجنبي لكنه ليس بوضوح و بساطة و فاعلية كودك شكرا لك سؤال : نقلت الكود بدون هذا السطر Private Sub ListBox1_Click() TextBox1.Value = ListBox1.Value End Sub شو أهميته

السلام عليكم أريد أضافة القيم المكررة في العمود الأول مرة واحدة و عند الكتابة في التكست بوكس يتم فلترة ةالليست بوكس حسب القيمة المكتوبة شكرا listchange.rar

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

فكرة جميلة جدا سأضع كود حفظ لملف العمل عندما أتوقف عن العمل

يا أخوة أنا لم أستطع تحميل الملف الثاني حدا عندو المشكلة نفسها أو بس أنا

كود راااااااااائع شكرا لك أستاذي الكريم شكرا أيضا للشرح المستفيض لأنني أتعلم منه

ورقة NN ورقة MM أريد نقل محتوى خلية من الورقة الأولى للورقة الثانية بشرط عدم تكرار القيمة مرة ثانية في العمود يعني أن كان يوجد الرقم 12 - لا يقوم الكود بنقل رقم 12 للورقة الثانية حاولت بكود و لم ينجح أرجو المساعدة و شكرا ملف مرفق المصنف1.rar

يا أخي و الله العظيم الملف كبير جدا لا يمكن أرافقه و أنا ممتن لطول صبرك و عملك للخير معنا و لا أستطيع رفض طلب لك بيمشي الحال أنشر الكود فقط

يا أخي دائما بيمشي الحال لما بتحاول شكرا ألك

أولا شكرا لأخي ابراهيم على المحاولة لكنها لم تنفع ثانيا جربت أن أرفق مجلد مشابه لبرنامجي عسى يقوم بالواجب و شكرا 2222.rar

عندي ملف مفتوح اسمه = 20150817 أنا اعمل على ملفي اسمهN_M أريد البحث في الملف المفتوح 20150817 من خلال يوسرفورم في ملفي كتبت الكود التالي و لم ينجح علما أن ورقة البحث في الملف المفتوح هي price1 Private Sub CommandButton3_Click() 'ÇÈÍË Dim nw As Workbooks Set nw = "20150817" If OptionButton1 = True Then With Sheets("price1") Dim LastRow As Integer, r As Integer, t As Integer ListBox1.Clear LastRow = .Cells(.Rows.Count, 1).End(xlUp).Row For r = 2 To LastRow If .Cells(r, 3) Like "*" & TextBox1.Text & "*" Then ListBox1.AddItem ListBox1.List(t, 0) = .Cells(r, 3) ListBox1.List(t, 1) = .Cells(r, 6) t = t + 1 End If Next End With End If End Sub الأخ ياسر لا أعرف كيف أرفق ملف مع هذه المشاركة المطلوب : كيف يمكن تحديد وجهة البحث على أن تكون الملف المفتوح و ليس الملف الرئيسي الذي أعمل عليه و شكرا

شكرا يا استاذي الكريم هو المطلوب

الملف مرفق بالمشاركة الاولى استاذي الكريم