ActiveCell Property Example

This example uses a message box to display the value in the active cell. Because the ActiveCell property fails if the active sheet isn't a worksheet, the example activates Sheet1 before using the ActiveCell property.

Worksheets("Sheet1").Activate
MsgBox ActiveCell.Value

This example changes the font formatting for the active cell.

Worksheets("Sheet1").Activate
With ActiveCell.Font
    .Bold = True
    .Italic = True
End With