رجب جاويش

أخى الحبيب / حمادة عمر جزاك الله كل خير أخى الحبيب على هذا المرور العطر والكلمات الطيبة

أخى الفاضل / سمير جزاك الله كل خير

الأخت الفاضلة / سما محمد جربى الملف المرفق Book111.rar

أخى الفاضل جرب المرفق ترحيل مع vlookup2.rar

أخى الفاضل / أبو محمد أشرف جزاك الله كل خير أخى الفاضل على هذه الكلمات الطيبة

أخى الفاضل / الزير جزاك الله كل خير وتسلم ايديك على التعديل الجميل

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

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

السلام عليكم لاثراء الموضوع ترحيل مع vlookup.rar

وللمشاركة مع الأحبة هذا حل آخر ترصيد ذمم متشابهة.rar

أخى الفاضل / himass جزاك الله كل خير

أخى الفاضل السطر التالى LR = Cells(Rows.Count, 1).End(xlUp).Row يأتى برقم آخر خلية تحتوى على بيانات فى العمود A بعد ذلك حلقة تكرار من الخلية A2 الى آخر خليه بها بيانات For Each cl In Range("A2:A" & LR) السطر التالىx = cl & " " & cl.Offset(0, 1) يعمل على دمج محتويات كل خلية من العمود A مع الخلية المجاورة بعد ذلك تم اضافة ناتج الدمج كعنصر جديد فى الكومبوبوكس عن طريق السطر التالى Me.ComboBox1.AddItem x أخوك / رجب جاويش

السلام عليكم هذا هو الكود المطلوب Private Sub CommandButton1_Click() LR = [A1000].End(xlUp).Row + 1 i = 1 For Each cl In Range("A" & LR & ":F" & LR + 3) Cells(cl.Row, cl.Column) = Me.Controls("textbox" & i) i = i + 1 Next For T = 1 To 24 Me.Controls("textbox" & T) = "" Next End Sub Book1.rar

أخى الفاضل / nasersaeed أرجو أرفاق ملف توضح به ما تريد فيمكن حله بدالة if بدلا من indirect

هل تقصد هكذا Private Sub UserForm_Initialize() LR = Cells(Rows.Count, 1).End(xlUp).Row For Each cl In Range("A2:A" & LR) x = cl & " " & cl.Offset(0, 1) Me.ComboBox1.AddItem x Next End Sub comboBox.rar

أخى الحبيب / محمود تسلم ايديك وتسلم أفكارك

وهذه طريقة أخرى ضبط معادلة اندكس3.rar

أخى الفاضل /romio52225 جزاك الله أخى الفاضل

وهذه فكره أخرى وممكن استخدام دالة indirect مباشرة بدون اضافات ولكن الاضافات هدفها جعل الخلية فارغة عند عدم وجود بيانات ضبط معادلة اندكس2.rar

تفضل أخى ضبط معادلة اندكس1.rar

أخى الفاضل / ابو عونى شكرا جزيلا أخى الفاضل على هذه الكلمات الطيبة والمرور العطر وجزاك الله كل خير أخوك / رجب جاويش

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

أخى الفاضل / abumode75 جزاك الله كل خير

أخى الفاضل / أبو عبد الملك كما قال لك أخى الحبيب / محمود الخطأ فعلا فى عنوان الموضوع وهو ( المساعدة فى حل هذا السؤال ) حيث ينبغى أن يكون العنوان دالا على المحتوى

أخى الفاضل / أبو عبد الملك اليك حل سؤالك مع رجاء من أحد الأخوة المشرفين بتغير العنوان Q1.rar