اذهب الي المحتوي
أوفيسنا

كود لازاحة نطاق الصف الفارغ في الجدول


إذهب إلى أفضل إجابة Solved by سليم حاصبيا,

الردود الموصى بها

السلام عليكم ورحمة الله وبركاته

اخواني زملائي اعضاء منتدانا الغالي ارجوا منكم مساعدتي في كود يقوم بازاحة نطاق الصفوف الفارغة في الجدول كما هو موضح في الشرح والملف المرفق

ولكم منا أسمى عبارات الاحترام والتقدير

وعيدكم مبارك كل عام والامة الاسلامية بخير

2020-05-23_150437.png

تواتي 15.xlsm

رابط هذا التعليق
شارك

اخي  عبدالفتاح في بي اكسيل اقصد حذف الصف الفارغ في الجدول فقط وليس كل الورقة

يبدا من الصف ( D32:A1 ) يعني يحذف الصف الفارغ في هذا النطاق من الجدول فقط

 

رابط هذا التعليق
شارك

تفضل

انتبه اخي قلت  من a1 وو في الجدول الفعلي في ورقتك a9

لذلك هذا الكود يقوم بالاززاحة الى الاعلى ابتداءا من الخلية a1 و لا  يحذف الصف كاملا

 

اذا اردتت البدء من a9 غير في الكود

Private Sub CommandButton2_Click()
On Error Resume Next
    With Range("a1:d32")
    
    .SpecialCells(xlCellTypeBlanks).Delete Shift:=xlUp
    End With
End Sub

 

تواتي 15.xlsm

  • Like 2
رابط هذا التعليق
شارك

أخي التواتي . كان يجب التوضيح من الاول بأن هناك معادلات  مع طلبك .ليتم اجابتك بسرعة  .لعدم ضياع الوقت 

تفضل حبيبي  الملف النهائي 

الازاحة الى الاعلى و ازاحة الخلايا التي تحنوي على المعادلات معها

تواتي 15) fini.xlsm

  • Like 1
رابط هذا التعليق
شارك

هناك خلايا متعددة في الصف بها دوال

2020-05-23_200310.png

من فضلك لا تكرر نفس الطلب فى مشاركة منفصلة وجديدة ... تم حذف المشاركة الأخرى لعدم اهدار وقت الأساتذة وتشتيت الأعضاء

تواتي 15) fini.xlsm

رابط هذا التعليق
شارك

وفيت وكفيت الله يعطيك العافية أنت وكافة الأساتذة الساهرين على خدمتنا في هذا المنتدى الغالي واخص بالذكر سليم حاصبيا

الرائد77

عبدالفتاح في بي اكسيل

فبارك الله فيكم جميعا واتمنى للجميع عيد مبارك سعيد

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information