اكسيل | كيفية تحديد اول خلية فارغة فى اى عمود فى كل اوراق العمل Excel VBA Find First Blank Cells

بسم الله الرحمن الرحيم 
اهلا بكم متابعى موقع عالم الاوفيس

درس جديد ومميز وكود جديد من مكتبة اكواد اكسيل Excel VBA

 كيفية تحديد اول خلية فارغة فى اى عمود فى كل اوراق العمل


دائما فى نطاق عملنا فى الاكسل مانبحث عن اللاست رو Last Row
او خر صف فية بيانات حتى يتسنى لنا عمل اكواد الترحيل ووضع البيانات تحت بعضها ولكننا لم نسمع ان نحدد الخلية الاولى الفارغة

وهذا سؤال احد الاصدقاء

للاجابة على هذا السؤال نحتاج ان نذكركم بكيفية تحدد   اللاست رو Last Row من خلال الكود التالى


Sub lastblankcell()
lastcell = Cells(Rows.Count, 1).End(xlUp).Row
Cells(lastcell, 1).Select

End Sub

ثم نقوم بتحديد اول خلية فارغة فى العمود من خلال هذا الكود 



Sub firsblankcell()
Dim ws As Worksheet
Set ws = ActiveSheet
 For Each cell In ws.Columns(1).Cells
  If IsEmpty(cell) = True Then cell.Select: Exit For
  Next cell
End Sub 

ويقوم هذا الكود بوظيفة محددة وهى كيفية اختبار الخلايا الفارغة فى العمود من خلال الدالة IsEmpty

لمشاهدة شرح الفيدو 


Emad ghazi
كاتب المقالة
كاتب ومحرر اخبار اعمل في موقع عالم الاوفيس .

جديد قسم : اكسل متقدم