اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

Hks99

عضو جديد 01
  • Posts

    21
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

2 Neutral

عن العضو Hks99

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    Eng
  1. استاذي العزيز ... للاسف لما عملت صفوف اكثر لم يعمل الكود بالشكل الصحيح عند تغير DH53 و DH54 و DH6 لا تتغير وانما تتغير DH52 و DH51 و DH50 وايضا عند استخدامه اكثر عن مره لا يعمل ّ.... ولك جزيل الشكر list.box2.xlsm
  2. شكرا جزيلا استاذي العزيز ....🌹🌹🌹
  3. السلام عليكم ارجوا المساعده عندي listbox واريد "اختار اكثر من عنصر" وتغير البيانات للعناصر المختاره على حسب الاسبوع مثل لو ضغط على week1 يتغير الاسبوع للعناصر المختاره الى week1 ...وهكذا طبعا فيه ملف مرفق وبيكون اوضح list.box1.xlsm
  4. السلام عليكم ممكن تستفيد من هذا الملف من عمل الاستاذه ساجدة العزاوي t1.xlsm
  5. مثال وشرح على التعديل المطلوب جلب صور2.xls
  6. السلام عليكم ..... عندي برنامج جميل جدا نزلته من موقع الاستاذ مجدي يونس وله جزيل الشكر بس حبيت لو يكون فيه شوية تغير في شاشة التعديلات بدل ما تظهر البيانات في ComboBox تظهر في ListBox ولكم جزيل الشكر جلب صور.xls
  7. السلام عليكم الله يجعله في ميزان حسناتكم وجزاكم الله خير مشكورررين كثير ي اساتذه الله يزيدكم من فضله واتمنى لكم التوفيق
  8. السلام عليكم ورحمه الله بحمدلله وبجهودكم تعلمنا الكثير عن البرمجة من الصفر من خلال هذا الموقع الرائع وجهودكم التي تشكروووون عليها (في ميزان حسناتكم) والحمدلله عملت برنامج جميل بس صادفة هذه المشكلة وارجوا المساعدة وهية الترحيل من شيت الى شيت اريد انقل البياانات من العمود F من SHEET1 الى العمود G في SHEET2 طبعا يبحث عن نفس بيانات المعدة بس يغير العمود G على حسب العمود F من SHEET1 وهذا عمل بسيط للتجربة ‫QTesT.xlsm
  9. مشكوووووور كثير استاذي بارك الله فيك وجعله في ميزان حسناتك الله يزيدك من علمه ♥️
  10. السلام عليكم ..... اجوا المساعدة في كود الطباعة بحيث اولا يكون مدى الطباعة مطاطي ثانيا تكون العناوين موجودة اعلى كل صفحة يتم طبعتها SERIAL NO IC DATE A/C NO RECEIVE DATE TEST ISSUE DATE WEEKS DUE DATE SECTION ولكم جزيل الشكر ESSA.xls
  11. السلام عليكم ....كل عام والجميع بخير ارجوا مساعدي في كود vba لنقل البانات من الشيت list الى الشيت all ("range ( "a10:j20 الى ("range ( "a1:j10 ولكم جزيل الشكر..... test.xls
  12. وعليكم السلام ورحمه الله وبركاته جرب هذا الكود Private Sub TextBox4_Change() TextBox4.Value = Format(TextBox4.Value, "mm-dd-yyyy") End Sub
  13. السلام عليكم ورحمه الله .... من خلال بحثي حصلت على عمل بحث وتعديل البيانات ( شكرا للشخص الي عمله ) الا انه يعمل على شيت محدد ... كيف اقدر اخليه يعمل على جميع اوراق العمل وليش شيت واحد محد ولكم جزيل الشكر vba.xlsm
  14. شكرا لكم حصل الحل هوه باضافة ActiveSheet Private Sub ComboBox1_DropButtonClick() lr = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row ComboBox1.List =ActiveSheet.Range("A2:A" & lr).Value End Sub ا
×
×
  • اضف...

Important Information