如何在Excel表格中编辑“宏”

图上来ANZ工作簿源里的工作表名看不见，假设为Sheet1。同时百打开2个工作簿，执行下面代码就完成复制度过程。

Sub demo()
    Dim DesRng As Range
    With Workbooks("ASN.xls").Sheets("Sheet1")
        ''获取A列最下面的第一个空问单元格
        Set DesRng = .Cells(.Rows.Count, 2).End(xlUp).Offset(1, -1)
    End With
    With Workbooks("ANZ.xls").Sheets("Sheet0").UsedRange
        ''选择全部数据区域，答不包含标题行
        .Offset(1, 0).Resize(.Rows.Count - 1, .Columns.Count).Copy DesRng
    End With
End Sub

操作步骤
如果大家对VBA程序语言比较熟悉，可以直接在Excel中编辑宏会更方便，宏代码也更简单。复
执行“工具→宏→Visual Basic编辑器”命令，进入“Visual Basic编辑器”窗口。
在左侧“工程资源管理器”窗口中，选中保存宏的工作簿，然后执行“插制入→模块”命令，插入一个新模块（模块1）。
将相关宏代码输入或复制、粘贴到右侧的编辑窗百口中。
注意：宏的结构是：
Sub 宏名称()
相关代码
End Sub
输入完成后，关闭“Visual Basic编辑器”窗口返回即可。
本例我们直接编辑的宏，可以删除当前行前4列的单元格，而系统并不给出相关的提示。我们运度行一下看看效果。
只要选中复制部分内容，再按ctrl 和c键，完成复制。 2、到另一个表格的目标位置，同时按

首先要明确，你想做什么

举个例子：给A1变成红色

开发工具，录制宏，设置快捷键 CTRL+A

回到开始，正常操作，把A1填充红色

停止录制

测试一下，在新的表格里，按CTRL+A，A1就会自动变成红色