本示例在活动单元格中输入公式“=ROW()”。
ActiveCell.Formula = "=ROW()"