Excel VBA一键复制内容，粘贴到所选单元格

      在工作中处置数据时，经常会碰着要复制指心猿意马单位格（或指心猿意马区域）的内容，若何实现像网页上那样一键复制链接功能，这就需要借助于Excel中的VBA功能。

东西/原料

• Excel（本教程以Excel2013为例，同样合用于Excel其他版本）

方式/步调

1. 1

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

   
2. 2

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

   
3. 3

   建造按钮，具体操作：菜单栏“插入”—“外形”；

   
4. 4

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

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

   2.外形格局：外形填充 深色 15%；外形轮廓 无轮廓；外形结果 棱台。

   PS：粘贴按钮建造方式与复制按钮一样。

   
5. 5

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

   Excel2007打开VBA的三种方式！

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

6. 6

   插入模板，输入代码：

   Sub 复制()

   Cells(14, 3).Select ‘选择网页链接地点单位格

   Selection.Copy      ’复制网页链接

   End Sub

   Sub 粘贴()

   Dim rng As Range

   Set rng = Selection

   ActiveSheet.Paste  ‘粘贴

   End Sub

   
7. 7

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

   
8. 8

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

   

注重事项

• 若是感觉对您有点帮忙，请您撑持一下，感谢！