Jump to content
أوفيسنا

ابو القاسم

01 New pie
  • Content Count

    25
  • Joined

  • Last visited

Community Reputation

27 Excellent

About ابو القاسم

  • Rank
    Name

Profile Information

  • Gender (Ar)
    ذكر
  • Job Title
    تاجر
  1. الاستاذ سليم حاصبيا اذا اخفي Check Box فما فائدة وجود زر المسح و Check Box
  2. الاستاذ سليم حصبيا بسم الله ما شاء الله عليك وعلي هذا الابداع بارك الله فيك وفي ابداعك وزادك من العلم
  3. ' للاخفاء Me.CommandButton2.Visible = False ' للاظهار Me.CommandButton2.Visible = True
  4. جرب ده بس ده مكان واحد للبحث بحث باي حرف.xlsx
  5. اتمني يكون المطلوب ضريبة الدخل حسب الشرائح.xlsm
  6. اخي العزيز الكود ليس له علاقة بالفورم ولا الملف انت تحتاج الي كود من الصفر علي ما اعتقد
  7. اخي العزيز تتاكد من ان الادخال موجود من عدمه بهذا الكود ws = sheets("اسم الصفحة") ird = WorksheetFunction.CountIf(ws.Range("a3:a32"), TextBox2.Value) 'ثم بعد ذلك ادخل الشرط if ird = 1 then 'اي انه موجود msgbox "البيانات موجودة مسبقا" exit sub elseif ird = 0 then 'البيانات غير موجودة 'ادخل الكود الذي تريد تنفيذة end if
  8. Workbooks("ااسم الملف بالامتدات").Sheets("اسم الورقة") وكمل زي ما انته عايز
  9. اتمني يكون المطلوب ملف التوازيع (1).xlsm
×
×
  • Create New...