VB.net Excel.worksheet().cells().Value

Niarah picture Niarah · Apr 11, 2014 · Viewed 57.9k times · Source

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!

Answer

SysDragon picture SysDragon · Apr 11, 2014

That's because .Cells() returns an object.

You can try converting it to a Excel Cell object in another step, or you can try this (for example):

shXL.Range("A2").Value

With conversion will be:

Dim xRng As Excel.Range = CType(shXL.Cells(3,3), Excel.Range)
Dim val As Object = xRng.Value()