[حل شده] پیدا کردن اخرین ستون (سلول) داده در هر ردیف از جدول اکسل

[Atos]

با سلام و وقت بخیر خدمت دوستان

من یک دیتا ست دارای 80 هزار ردیف دارم و همه ردیف ها دارای ستون های یکسانی نیستند(به طور مثال مثلا یک ردیف داده دارای 5 تا ستون هستش ویک ردیف دیگه دارای 8 تا همین طور الی اخر) ازین رو میخوام فقط ستون اخر هر ردیف رو مشخص کنم ولی هر چی گشتم هیچ تابع یا ماکرویی نیست که بتونه اینو برا من مشخص کنه و داده های من به صورت متن هستند واینکه ماکرو ها و تابع ای تو در تویی که مثلا بکار رفتن برای اینکار فقط اعداد رو مشخص میکنن ولی ردیف های من به صورت متن هستند و این ستون های اخر که نام کشور ها در اون مشخص شده اند رو برای بحث پیش بینی لازم دارم ممنون میشم که در این خصوص راهنمایی بکنید با تشکر و وقتی که برای من گذاشتید.

[iranweld]

سلام
یک نمونه از فایل رو ضمیمه همین سایت کنید
از قسمت مدیریت فایل پیوست

[Atos]

بفرمایید این بخشی از دیتا ستمه که من در واقع تمام کشور ها رو که در ستون اخر اومده لازم دارم

[iranweld]

با سلام

از ماکرو ذیل استفاده کنید

Sub test()

z1 = Cells(Rows.Count, "b").End(xlUp).Row

For i = 1 To z1

k1 = Cells(i, Columns.Count).End(xlToLeft).Column

Cells(i, 1) = Cells(i, k1)

Next

End Sub 

[Atos]

یه دنیا ممنون واقعا لطف کردید عالی بود