本示例显示活动单元格的数字格式。

Msgbox ActiveCell.NumberFormatLocal