无法从未保存的 excel 中获取数据
Unable to fetch data from unsaved excel
我正在访问一个application.Through应用程序一个excel文件正在打开(不保存在下载中,直接打开)。现在我需要从未保存的excel.Is中读取数据有没有可能不保存文件,我们可以读取数据吗?我试过下面的代码:
Set objExcel = GetObject(,"Excel.Application")
Set objWorkbook = objExcel.WorkBooks("143317473_1.xls")
Set NewSheet = objWorkBook.Sheets.Item(1)
GetValuesFromUnsavedExcelFile = NewSheet.Cells(2, 1)
我收到错误:"Subscript out of Range at line 50"。
那么,读取前是否需要先保存文件??
我 运行 你的代码,它对我来说工作得很好 只有当我提供正确的工作簿名称时 。我只是在输入错误的工作簿名称时才收到您提到的错误,因此您需要确定工作簿名称。
此外,如果代码为运行时只有一个工作簿打开,您可以很好地使用当前活动的工作簿,如下所示:
Set objWorkbook = objExcel.ActiveWorkBook
另外,回答你问题的第二部分,不,在你阅读之前没有必要保存 excel。
我正在访问一个application.Through应用程序一个excel文件正在打开(不保存在下载中,直接打开)。现在我需要从未保存的excel.Is中读取数据有没有可能不保存文件,我们可以读取数据吗?我试过下面的代码:
Set objExcel = GetObject(,"Excel.Application")
Set objWorkbook = objExcel.WorkBooks("143317473_1.xls")
Set NewSheet = objWorkBook.Sheets.Item(1)
GetValuesFromUnsavedExcelFile = NewSheet.Cells(2, 1)
我收到错误:"Subscript out of Range at line 50"。
那么,读取前是否需要先保存文件??
我 运行 你的代码,它对我来说工作得很好 只有当我提供正确的工作簿名称时 。我只是在输入错误的工作簿名称时才收到您提到的错误,因此您需要确定工作簿名称。
此外,如果代码为运行时只有一个工作簿打开,您可以很好地使用当前活动的工作簿,如下所示:
Set objWorkbook = objExcel.ActiveWorkBook
另外,回答你问题的第二部分,不,在你阅读之前没有必要保存 excel。