Microsoft Office

Part VI
Programming Excel with VBA
ON the CD-ROM
A workbook that contains this macro is available on the companion CD-ROM. The file is
named select cells.xlsm.
Selecting a row or column
The macro that follows demonstrates how to select the column of the active cell. It uses the
EntireColumn property, which returns a range that consists of a column.
Sub SelectColumn()
ActiveCell.EntireColumn.Select
End Sub
As you may suspect, an EntireRow property also is available, which returns a range that consists of a row.
If you want to perform an operation on all cells in the selected column, you don’t need to select the column.
For example, when the following procedure is executed, all cells in the row that contains the active cell are
made bold:
Sub MakeRowBold()
ActiveCell.EntireRow.Font.Bold = True
End Sub
Moving a range
Moving a range consists of cutting it to the Clipboard and then pasting it to another area. If you record your
actions while performing a move operation, the macro recorder generates code as follows:
Sub MoveRange()
Range(“A1:C6”).Select
Selection.Cut
Range(“A10”).Select
ActiveSheet.Paste
End Sub
As demonstrated with copying earlier in this chapter (see “Copying a range”), this method is not the most
efficient way to move a range of cells. In fact, you can do it with a single VBA statement, as follows:
Sub MoveRange2()
Range(“A1:C6”).Cut Range(“A10”)
End Sub
This statement takes advantage of the fact that the Cut method can use an argument that specifies the
destination.
ON the CD-ROM
A workbook that contains this macro is available on the companion CD-ROM. The file is
named range move.xlsm.
Looping through a range efficiently
Many macros perform an operation on each cell in a range, or they may perform selective actions based on
the content of each cell. These operations usually involve a For-Next loop that processes each cell in the
range.
760