ابو العلاء قام بنشر يناير 14, 2020 مشاركة قام بنشر يناير 14, 2020 السلام عليكم ممكن مساعدة بالملف المرفق وهو لملف بداخله شيتين في الشيت الاول قائمة لكودات واسماء وبجانب كل اسم صندوق CHECK BOX المطلوب : في حال كان مربع CHECK BOX غير فعال يختفي السطر الخاص بهذا الاسم كاملا من شيت REPORT مع جزيل الشكر TEST.xlsx رابط هذا التعليق شارك More sharing options...
أفضل إجابة سليم حاصبيا قام بنشر يناير 14, 2020 أفضل إجابة مشاركة قام بنشر يناير 14, 2020 جرب هذا الكود (حدد البوكس ثم انتقل الى اي خلية او اضغط Enter) Option Explicit Private Sub Worksheet_SelectionChange(ByVal Target As Range) tesl End Sub '+++++++++++++++++++++++++++++ Sub tesl() Dim cb As CheckBox, n For Each cb In Me.CheckBoxes cb.TopLeftCell.Offset(1, -1).NumberFormat = _ IIf(cb.Value <> 1, ";;;", "General") Next cb End Sub الملف مرفق( شيت Key) TEST_xxx (3).xlsm 1 1 رابط هذا التعليق شارك More sharing options...
omar elhosseini قام بنشر يناير 15, 2020 مشاركة قام بنشر يناير 15, 2020 بعد أذن اخونا سليم حاصبيا اخ ابو العلاء ما هو الحد الأقصي لعدد الأكواد 1 رابط هذا التعليق شارك More sharing options...
ابو العلاء قام بنشر يناير 15, 2020 الكاتب مشاركة قام بنشر يناير 15, 2020 كل الشكر استاذ سليم... بارك الله فيك اخ عمر ما حصرت للان عدد الاكواد رابط هذا التعليق شارك More sharing options...
omar elhosseini قام بنشر يناير 16, 2020 مشاركة قام بنشر يناير 16, 2020 اخ ابو العلاء لك مني ملف تشك بوكس هدية ضع به كود اخونا سليم حاصبيا هدية.rar 1 رابط هذا التعليق شارك More sharing options...
ابو العلاء قام بنشر يناير 16, 2020 الكاتب مشاركة قام بنشر يناير 16, 2020 سلمت اخي عمر .. كل الشكر والتقدير رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.