本示例显示活动单元格的值。

MsgBox ActiveCell.Value2