在工作中处理数据时，经常会碰到要复制指定单元格（或指定区域）的内容，如何实现像网页上那样一键复制链接功能，这就需要借助于Excel中的VBA功能。工具/原料moreExcel（本教程以Excel2013为例，同样适用于Excel其他版本）方法/步骤1/8分步阅读

本教程以复制粘贴一个网页链接（百度首页链接）为例。

2/8

本教程的网页链接放在C14单元格；

3/8

制作按钮，具体操作：菜单栏“插入”—“形状”；

4/8

设置按钮格式：（本教程设置如下，仅供参考）

1.字体格式：宋体，黑色加粗，字号11。

2.形状格式：形状填充 深色 15%；形状轮廓 无轮廓；形状效果 棱台。

PS：粘贴按钮制作方法与复制按钮一样。

5/8

从Excel窗口进入VBA窗口，方法可参考

Excel2007打开VBA的三种方法！

https://jingyan.baidu.com/article/066074d61a370dc3c21cb0ec.html

6/8

插入模板，输入代码：

Sub 复制()

Cells(14, 3).Select ‘选择网页链接所在单元格

Selection.Copy ’复制网页链接

End Sub

Sub 粘贴()

Dim rng As Range

Set rng = Selection

ActiveSheet.Paste ‘粘贴

End Sub

7/8

回到Excel窗口，点击“复制链接”按钮，可以看到网页链接已经复制到了剪贴板中。

8/8

选择任一个空单元格，点击“粘贴”按钮即可。

注意事项

如果觉得对您有点帮助，请您支持一下，谢谢！