Hks99

السلام عليكم ...ارجوا المساعده اولا : عندي البيانات تظهر في lisbox ممكن لما احدد اكثر عن اسم وارسلها لاسبوع معين تتغير البيانات الى الاسبوع الي اخترته ((اريد الكود يعمل لكثر من تحديد في نفس الوقت multiselect)) ثانيا: كود الطباعه ممكن قبل الطباعه تفرز البيانات ع حسب العمود E بحيث الي فيها قيمه 1013 تكون اخر شي تحت **** مرفق ملف العمل للتوضيح TEST9.xls

استاذي العزيز ... للاسف لما عملت صفوف اكثر لم يعمل الكود بالشكل الصحيح عند تغير DH53 و DH54 و DH6 لا تتغير وانما تتغير DH52 و DH51 و DH50 وايضا عند استخدامه اكثر عن مره لا يعمل ّ.... ولك جزيل الشكر list.box2.xlsm

شكرا جزيلا استاذي العزيز ....🌹🌹🌹

السلام عليكم ارجوا المساعده عندي listbox واريد "اختار اكثر من عنصر" وتغير البيانات للعناصر المختاره على حسب الاسبوع مثل لو ضغط على week1 يتغير الاسبوع للعناصر المختاره الى week1 ...وهكذا طبعا فيه ملف مرفق وبيكون اوضح list.box1.xlsm

السلام عليكم ممكن تستفيد من هذا الملف من عمل الاستاذه ساجدة العزاوي t1.xlsm

مثال وشرح على التعديل المطلوب جلب صور2.xls

السلام عليكم ..... عندي برنامج جميل جدا نزلته من موقع الاستاذ مجدي يونس وله جزيل الشكر بس حبيت لو يكون فيه شوية تغير في شاشة التعديلات بدل ما تظهر البيانات في ComboBox تظهر في ListBox ولكم جزيل الشكر جلب صور.xls

السلام عليكم الله يجعله في ميزان حسناتكم وجزاكم الله خير مشكورررين كثير ي اساتذه الله يزيدكم من فضله واتمنى لكم التوفيق

السلام عليكم ورحمه الله بحمدلله وبجهودكم تعلمنا الكثير عن البرمجة من الصفر من خلال هذا الموقع الرائع وجهودكم التي تشكروووون عليها (في ميزان حسناتكم) والحمدلله عملت برنامج جميل بس صادفة هذه المشكلة وارجوا المساعدة وهية الترحيل من شيت الى شيت اريد انقل البياانات من العمود F من SHEET1 الى العمود G في SHEET2 طبعا يبحث عن نفس بيانات المعدة بس يغير العمود G على حسب العمود F من SHEET1 وهذا عمل بسيط للتجربة ‫QTesT.xlsm

مشكوووووور كثير استاذي بارك الله فيك وجعله في ميزان حسناتك الله يزيدك من علمه ♥️

السلام عليكم ..... اجوا المساعدة في كود الطباعة بحيث اولا يكون مدى الطباعة مطاطي ثانيا تكون العناوين موجودة اعلى كل صفحة يتم طبعتها SERIAL NO IC DATE A/C NO RECEIVE DATE TEST ISSUE DATE WEEKS DUE DATE SECTION ولكم جزيل الشكر ESSA.xls

مشكووور استاذي .....جزاك الله خير

السلام عليكم ....كل عام والجميع بخير ارجوا مساعدي في كود vba لنقل البانات من الشيت list الى الشيت all ("range ( "a10:j20 الى ("range ( "a1:j10 ولكم جزيل الشكر..... test.xls

وعليكم السلام ورحمه الله وبركاته جرب هذا الكود Private Sub TextBox4_Change() TextBox4.Value = Format(TextBox4.Value, "mm-dd-yyyy") End Sub

السلام عليكم ورحمه الله .... من خلال بحثي حصلت على عمل بحث وتعديل البيانات ( شكرا للشخص الي عمله ) الا انه يعمل على شيت محدد ... كيف اقدر اخليه يعمل على جميع اوراق العمل وليش شيت واحد محد ولكم جزيل الشكر vba.xlsm

شكرا لكم حصل الحل هوه باضافة ActiveSheet Private Sub ComboBox1_DropButtonClick() lr = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row ComboBox1.List =ActiveSheet.Range("A2:A" & lr).Value End Sub ا

السلام عليكم ورحمه الله .... ارجوا مساعدتي ....عندي combobox وعامل قائمة منسدلة وتبحث في الشيت الي محددنها اريد كود تظهر القائمة المنسدلة من الشيت المفعل وليس المحدد Private Sub ComboBox1_DropButtonClick() lr = sheet6.Cells(Rows.Count, 1).End(xlUp).Row ComboBox1.List = sheet6.Range("A2:A" & lr).Value End Sub انا محدد الشيت بس اريده يعمل بالشيت المفعل وليس المحدد مثلا لو فاتح شيت sheet7 يعمل عليها ولكم جزيل الشكر vba.xlsm

شكرا يا استاذي الغالي😘

السلام عليكم ورحمه الله .... ارجوا مساعدتي ....عندي ملف العمل واريد لما اعمل ترحيل من listbox الى الشيت انه يحذف البيانات الي كانت موجودة من اول في الشيت يعني اريد يكون في شيت البيانات...اخر بيانات حددتها من listbox ورحلتها ..لطباعتها او اذا في طريقة لطباعة البيانات المحددة فقط في listbox البحث من خلال اى عدد من التكست بوكس.xlsm