شرح
هذه الفقره\
data = wsSource.Range(foundCell.Offset(0, 1), foundCell.Offset(0, 10)).Value
data = wsSource.Range(foundCell.Offset(0, 10), foundCell.Offset(0, 19)).Value
data = wsSource.Range(foundCell.Offset(0, 28), foundCell.Offset(0, 38)).Value
الموجودة في هذا الملف
شرح.xlsm