如何利用excel VB复制单元格内容？

你可以利用宏，自己录制一个宏，然后复制粘贴单元格操作一遍，然后点停止保存，下次就可以用这个宏了。

Sub yy()
FilePath = "D:\1.xlsx"
  Set XLSHEET = Workbooks.Open(FilePath)
  Set XLRA = XLSHEET.Sheets(1).Range("a1:f10")
  XLRA.Copy Sheet1.Range("C3")
  XLSHEET.Close
End Sub

Sub AA()
Dim sht As Worksheet, wb2 As Workbook, wb3 As Workbook
Application.DisplayAlerts = False
Set wb1 = Workbooks.Open(ThisWorkbook.Path & "\1")
With wb1
arr = Sheets(1).Range("A1:F10")
End With
[C3].Resize(10, 6) = arr
wb1.Close 1
Set wb1 = Nothing
Application.DisplayAlerts = True
End Sub
复制和被复制的都在同1个盘符