zahraamohamed قام بنشر يناير 2, 2021 قام بنشر يناير 2, 2021 ممكن تعديل الماكرو لينفذ إخفاء الصف اذا كان الخلية فى العمود a فارغ+الخلايا من d:j =0 او فارغة شكرا hide rows.xlsm
أفضل إجابة سليم حاصبيا قام بنشر يناير 2, 2021 أفضل إجابة قام بنشر يناير 2, 2021 This Macro Sub HideRows() Dim Ro%, i% With Sheets("Sheet1") .Rows.Hidden = False Ro = .Cells(Rows.Count, "C").End(3).Row For i = 1 To Ro If .Cells(i, 1) = vbNullString And _ Application.Sum(.Cells(i, "d").Resize(, 7)) = 0 Then .Cells(i, 1).EntireRow.Hidden = True End If Next End With End Sub '+++++++++++++++++++++++++++++++++++ Sub show_all() Sheets("sheet1").Rows.Hidden = False End Sub 1
zahraamohamed قام بنشر يناير 2, 2021 الكاتب قام بنشر يناير 2, 2021 ميرسى كلك زوق والله بارك الله فيك تم تطبيق الماكرو ولكن اخر اربع صفوف فارغين تمام ومع ذلك لم يت الاختفاء شكرا لحضرتكم hide rows.xlsm
سليم حاصبيا قام بنشر يناير 3, 2021 قام بنشر يناير 3, 2021 انا اعتمدت على العامود C (في الملف الذي رفعته سابقاً) عندما رأيت ان اخر صف فيه غير فارغ لذلك كي يشمل الماكرو اي عامود يجب استبدال ما في المربع الأحمر بما هو في المربع الأزرق (الصورة) 2
zahraamohamed قام بنشر يناير 3, 2021 الكاتب قام بنشر يناير 3, 2021 اشكر حضرتك جدا حضرتك كلك ذوق بارك الله فيك
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.