如果要把单元格A1中的内容复制到单元格C1中，用VBA如何实现？

Sub Copy_paste()

Range("A1").ClearFormats '先清除格式

Range("A1").Select

Selection.Copy

Range("C1").Select

ActiveSheet.Paste

End Sub

    按下Alt+F11,打开VBA编辑器，执行一下，试试效果！