معادلة جلب بيانات عمود بدون فراغات

[konafa4000]

ما هى المعادلات التى يتم ادراجها بالمدى i2:j13 
وذلك لجميع اكثر من مدى فى مدى واحد مع تجاهل الصفوف الخالية بمعادلات وليس بكود VBA

مع العلم بوجود اكثر من عمود بعد الاسم و الكود يمكن ادراجها ايضا

تم تعديل عنوان المشاركة , ليكون معبر أكثر عن طلبك

 

New Microsoft Excel Worksheet.xlsx

[Ali Mohamed Ali]

تفضل تم الحل بطريقتين بمعادلات المصفوفة (Ctrl+Shift+Enter)

=IF(ROWS($L$3:L3)>COUNTA($B$3:$B$500),"",INDEX($B$3:$B$500,SMALL(IF($B$3:$B$500<>"",ROW($B$3:$B$500)-ROW($B$3)+1),ROWS($L$3:L3))))

وايضا بالكود .. حتى تختار المناسب لك من بين الحلين

Sub Rectangle1_Click()
    On Error Resume Next
    Worksheets("Sheet1").Range("b3:c100").SpecialCells(xlCellTypeConstants).Copy Worksheets("Sheet1").Range("I3:I100")
       Application.CutCopyMode = False
End Sub

 

جلب بيانات عمود بدون فراغات.xlsm

[konafa4000]

شكرا صديقى العزيز Ali Mohamed Ali  على مجهودك الكريم 

المعادلة ممتازة جدا