vba 读取excel数据,怎么修改以下语句?

Set wb = ThisWorkbook来定义并设置当前工作簿，然后Dim ws As Worksheet: Set ws = wb.Sheets(Sheet1)来指定要操作的表，接着如果是要读取A1单元格的数据，可以写成Dim cellValue As Variant: cellValue = ws.Range(A1).Value，这样就能准确获取到数据了。