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

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

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

文章插图

需要这些哦
Excel(本教程以Excel2013为例,同样合用于Excel其他版本)
方式/
1本教程以复制粘贴一个网页链接(百度首页链接)为例 。

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

文章插图

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

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

文章插图

3建造按钮,具体操作:菜单栏“插入”—“外形”;

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

文章插图

4设置按钮格局:(本教程设置如下,仅供参考)
1.字体格局:宋体,黑色加粗,字号11 。
2.外形格局:外形填充 深色 15%;外形轮廓 无轮廓;外形结果 棱台 。
PS:粘贴按钮建造方式与复制按钮一样 。

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

文章插图

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

文章插图

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

文章插图

5从Excel窗口进入VBA窗口,方式可参考 
Excel2007打开VBA的三种方式!
https://jingyan.baidu.com/article/066074d61a370dc3c21cb0ec.html

6插入模板,输入代码:
Sub 复制()
Cells(14, 3).Select ‘选择网页链接地点单位格
Selection.Copy      ’复制网页链接
Sub
Sub 粘贴()
Dim rng As Range
Set rng = Selection
ActiveSheet.Paste  ‘粘贴
Sub

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

文章插图

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

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

文章插图

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

文章插图

8【Excel VBA一键复制内容,粘贴到所选单元格】选择任一个空单位格,点击“粘贴”按钮即可 。

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

文章插图

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

文章插图

注重事项若是感觉对您有点帮忙,请您撑持一下,感谢!

以上内容就是Excel VBA一键复制内容,粘贴到所选单元格的内容啦,希望对你有所帮助哦!

推荐阅读