Excel Range: Difference between revisions

From AutoIt Wiki
Jump to navigation Jump to search
(Get last used cell in a column)
mNo edit summary
Line 23: Line 23:
== Last Cell ==
== Last Cell ==
<syntaxhighlight lang="autoit">$oRange = $oWorkbook.ActiveSheet.UsedRange.SpecialCells($xlCellTypeLastCell)</syntaxhighlight>
<syntaxhighlight lang="autoit">$oRange = $oWorkbook.ActiveSheet.UsedRange.SpecialCells($xlCellTypeLastCell)</syntaxhighlight>
Returns the last used cell (bottom right) in the specified range.<br />
Returns the last used cell (bottom right) in the used range.<br />
[[File:Range_LastCell.jpg]]<br />
[[File:Range_LastCell.jpg]]<br />
<br />
<br />
External Link: [http://www.ozgrid.com/VBA/ExcelRanges.htm Excel Ranges: Finding the Last Cell in a Range]
External Link: [http://www.ozgrid.com/VBA/ExcelRanges.htm Excel Ranges: Finding the Last Cell in a Range]<br />
<br /><p>
<br />
<syntaxhighlight lang="autoit">Local Const $xlUp = -4162
<syntaxhighlight lang="autoit">Local Const $xlUp = -4162
With $oWorkbook.ActiveSheet ; process active sheet
With $oWorkbook.ActiveSheet ; process active sheet

Revision as of 14:50, 25 April 2016

On this page you will find some special ranges and how to define them in AutoIt.
As input file I will use the following Excel workbook. All cells which have a value now or had a value before (means: all cells which had been touched by the user or a script) are displayed in grey.

All examples show cells of the selected range in yellow.

Current Region

$oRange = $oWorkBook.Activesheet.Range("B4").CurrentRegion

The current region is a range bounded by any combination of blank rows and blank columns.

Note that cell B6 is not part of the region. The cell has been touched before but now is blank and hence bounds the region.

Empty Cells

$oRange = $oWorkbook.ActiveSheet.UsedRange.SpecialCells($xlCellTypeBlanks)

Marks all empty cells in the specified range.

Entire Row / Entire Column

$oRange = $oWorkBook.Activesheet.Range("B2").EntireRow

Selects the entire row(s) of the specified range.

Use method "EntireColumn" to select the columns of the specified range.

Last Cell

$oRange = $oWorkbook.ActiveSheet.UsedRange.SpecialCells($xlCellTypeLastCell)

Returns the last used cell (bottom right) in the used range.


External Link: Excel Ranges: Finding the Last Cell in a Range

Local Const $xlUp = -4162
With $oWorkbook.ActiveSheet ; process active sheet
	$oRangeLast = .UsedRange.SpecialCells($xlCellTypeLastCell) ; get a Range that contains the last used cells
	$iRowCount = .Range(.Cells(1, 1), .Cells($oRangeLast.Row, $oRangeLast.Column)).Rows.Count ; get the the row count for the range starting in row/column 1 and ending at the last used row/column
	$iLastCell = .Cells($iRowCount + 1, "B").End($xlUp).Row ; start in the row following the last used row and move up to the first used cell and grab this row number
	ConsoleWrite("Last used cell in column B: " & $iLastCell & @CRLF)
EndWith

Returns the last used cell in column "B".

Used Range

$oRange = $oWorkBook.Activesheet.UsedRange

Selects all cells which have a value now or had a value before (means: all cells which had been touched by the user or a script).
Note that the range does not contain row 1 and column 1!


$sUpperLeftCell = $oWorkbook.ActiveSheet.UsedRange.Cells(1, 1).Address

Returns the address of the upper left cell of the used range. In this examle: B2

With $oWorkbook.ActiveSheet
	$oRangeLast = .UsedRange.SpecialCells($xlCellTypeLastCell)
	$oRange = .Range(.Cells(1, 1), .Cells($oRangeLast.Row, $oRangeLast.Column))
EndWith

This lines extend the used range to start with cell A1.