怎样使用VBA复制粘贴单元格内容？

1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码，然后运行

Sub adc()

     On Error Resume Next        '出错继续执行后面的代码
     'Worksheets("Sheet1").Range("A1").Font.ColorIndex = 3
     'Selection.Font.ColorIndex = 5
     Range("A1:A11").Select     '选择辅助的区域
     Selection.Copy             '复制
     Range("A13").Select        '选择粘贴的第一个单元格
     ActiveSheet.Paste          '粘贴
         
End Sub

5、最后就可以看到我们成功的复制了粘贴将设置的内容