1、打开Microsoft Office Excel 2007，然后按下快捷键ALT+F11打开VBA（宏）编辑界面，然后点菜单栏【插入】下拉中列表中点【模块（M）】如图。
2、插入了一个模块1，在代码框中复制如下代码：
Sub 复制粘贴()
'2020-1-19 21:14:00
On Error Resume Next
Dim myr As Range, myr1 As Range
Set myr1 = Selection
Set myr = Application.InputBox(Prompt:="使用鼠标选择要粘贴单元格", Type:=8)
myr1.Copy myr
End Sub
3、以上操作动态过程如下：
4、回到工作表窗口，先选复制单元格区域，再运行【复制粘贴】宏（菜单栏中点【视图】中下列表中【宏】列表【查看宏(V)】打开宏对方框，选该宏名），宏运行会提示你，"使用鼠标选择要粘贴单元格？"，根据需要选择粘贴单元格输入，运行过程如下图。
1、在自定义快速访问工具栏点左边下拉箭头，弹出列表，如下图
2、在上面下拉列表中找到【其他命令（M）…】点下，弹出“Excel选项”对话框。
3、“Excel选项”对话框中按下面步骤操作
1处点下拉箭头选“宏”
2处选“复制粘贴”
3处【添加（A）>>】
4处【确定】
4、在自定义快速访问工具栏上面多一个宏工具按钮【复制粘贴】
5、以上操作过程动态如下
6、使用：先选复制单元格区域，点【复制粘贴】宏工具按钮，然后宏运行会提示你，"使用鼠标选择要粘贴单元格？"，根据需要选择粘贴单元格输入。
