Trying to write information in Excel worksheet But have some strange problems ;) i looked info on Google but no result.. So plz help )
I Add reference Microsoft.excel 14.0 Object Library and also Import Microsoft.Office.interop
I need to get Value from specific cell so i use command Checker = shXL.cells(1,1). And here i don't have Value.... i only got this (Equal / GetHashCode / GetType / toString) So question is WHY i don't have (.Value) for .cells and where is an Error
Dim appXL As Excel.Application
Dim wbXL As Excel.Workbook
Dim wbsXL As Excel.Workbooks
Dim shXL As Excel.Worksheet
Dim Checker As Integer
appXL = CreateObject("excel.application")
appXL.Visible = True
wbsXL = appXL.Workbooks
wbXL = wbsXL.Open("D:\Некорректные Переключения\Base.xlsx", , , , 12121)
shXL = wbXL.ActiveSheet
Checker = shXL.Cells(1, 1).value()
Best Regards and THX!