مراجعه به آخرین خانه از سطر یا ستون اکسل

یکی از این روشها استفاده از متد End از شیئ Range می باشد.

آموزش اکسل را با مثال آغاز می کنیم

مثال های زیر را ملاحظه فرمایید:

مثال 1: ماکروی زیر آخرین خانه غیرخالی در ستون A (از خانه A1 به پایین قبل از اولین خانه خالی) را انتخاب می کند:

Sub LastCellBeforeBlankInColumn() Range("A1").End(xldown).Select End Sub

مثال 2 : ماکروی زیر آخرین خانه غیرخالی در ستون A را انتخاب می کند:

<b>Sub LastCellInColumn()</b> Range("A1048576").End(xlup).Select <b>End Sub</b>

مثال 3 : ماکروی زیر آخرین خانه غیرخالی در سطر 1 (از خانه A1 به جلوقبل از اولین خانه خالی) را انتخاب می کند:

<b>Sub LastCellBeforeBlankInRow()</b> Range("A1").End(xlToRight).Select <b>End Sub</b>

مثال 4 : ماکروی زیر آخرین خانه غیرخالی در سطر 1 را انتخاب می کند:

<b>Sub LastCellInRow()</b> Range("XFD1").End(xlToLeft).Select <b>End Sub</b>

ابزار GoTo Special در اکسل گزینه برای مراجعه به آخرین خانه دارد:

همین کار را می توان با استفاده از ماکرو و با دستور زیر انجام داد:

Range("A1").SpecialCells(xlCellTypeLastCell).Select