大龙的博客

常用链接

统计

最新评论

AddModiBy ---- 宏

    Sub AddModiBy()
        Dim selection As TextSelection
        ActiveDocument().Selection.StartOfLine()
        selection = ActiveDocument().Selection
        selection.Text = ControlChars.Tab + "//" + "Modi by yym on " + CStr(Now())
    End Sub

posted on 2007-08-28 11:29 大龙 阅读(127) 评论(0)  编辑 收藏 引用