Dieses Beispiel verwendet ein Meldungsfeld, um den Wert der aktiven Zelle anzuzeigen. Da die ActiveCell-Eigenschaft zu einem Fehler führt, wenn das aktive Blatt kein Tabellenblatt ist, wird im Beispiel zunächst Sheet1 geöffnet und erst danach die ActiveCell-Eigenschaft angewendet.
Worksheets("Sheet1").Activate
MsgBox ActiveCell.Value
Das nächste Beispiel ändert die Schriftformatierung der aktiven Zelle.
Worksheets("Sheet1").Activate
With ActiveCell.Font
.Bold = True
.Italic = True
End With