肉鸭肉鸭
自己录制一个宏 然后按ALT+F11打开，进行修改就可以了 
SUB 格式设置() '以C5:F14区域为例 With Range("C5:F14") BLineStyle = xlContinuous '连续线条，没有设置粗细，也没分上下左右 FSize = 12 RowHeight = 18 End WithEND SUB
通过为一个宏赋予某个特殊的名称，就可在执行某项操作（例如启动 Word 或打开文档）时自动运行宏。Word 将下列名称识别为自动宏，或称“auto”宏。AutoExec：启动 Word 或加载全局模板时AutoNew：每次新建文档时AutoOpen：每次打开已有文档时AutoClose：每次关闭文档时AutoExit：退出 Word 或卸载全局模板时当以下条件之一为真时，将识别代码模块中的自动宏。* 模块在自动宏（如 AutoExec）之后命名，并且包含一个名为“Main”的过程。 * 任何模块中的过程在自动宏之后命名。 与其他宏一样，自动宏也可以保存于 Normal 模板、其他模板或文档中。要让自动宏运行，它必须位于活动文档的 Normal 模板中，或活动文档选用的模板中。唯一例外的是 AutoExec 宏，它只有存储于以下位置时才可自动运行：Normal 模板、通过“模板和加载项”对话框全局加载的模板、或由“Startup”文件夹指定的文件夹中的全局模板。在命名冲突的情况下（多个自动宏名相同），Word 将运行上下文中最近的自动宏。例如，如果同时在文档及其附加的模板中创建了 AutoClose 宏，则仅执行文档中的自动宏。如果在 Normal 模板中创建了 AutoNew 宏，只有当文档或其附加模板中没有名为 AutoNew 的宏时，该自动宏才能运行。注：按住 Shift 可以终止自动宏的运行。例如，基于包含 AutoNew 宏的模板新建文档时，按住 Shift 可终止 AutoNew 宏的运行。方法是：按住 Shift，单击（“文件”菜单）“新建”对话框中的“确定”按钮，并在显示新文档前持续按住 Shift。如果运行一个宏时有可能触发自动宏，(这种情况，我没遇过!)可用下列指令终止自动宏的运行：WordBDisableAutoMacros
加入按钮，在事件中加入下面代码： CSelect With SFont Name = "Arial" Size = 8 Strikethrough = False Superscript = False Subscript = False OutlineFont = False Shadow = False Underline = xlUnderlineStyleNone ColorIndex = xlAutomatic End With Range("A1")Select
