当打开excel并在VBA下面操作时,VBA显示有一些错误,请帮助检查。
Sub Tianchong()
Dim i As String
Dim w As Worksheet, wb As Workbook, t As Worksheet
Set wb = Workbooks.Open("C:\Users\ZHEN YUAN\Desktop\vba\att.xlsx")
Set w = wb.Worksheets("Sheet1")
set t = worksheets("申请单")
t.Cells(7, 4) = wb.Cells(2