please answer me

Question

HI i wrote this code put at run time there is an error mssege it is aditional information:object reference not set to an instance of an object at line oSheet = oBook.Worksheets(1) i need from this programm to open excel sheet and get data from it Dim obj As Excel.Application obj = CreateObject(Excel.Application) Dim oBook As Excel.Workbook obj.Visible = True Dim oBooks As Object = obj.Workbooks.Open(c:/test2.xls) Dim oSheet As Object oSheet = oBook.Worksheets(1) obj.Quit() thanks

parmeshwara2001 · Answer

Whenever you are creating any objectuse New keyword to create it's instance Dim obj as Excel.Application obj= new CreteObject(Excel.Application) 'OR 'Dim obj As New Excel.Application 'Second line will be redundant then Dim oBook As New Excel.WorkBook obj.Visible=True Dim oBooks as New Object =obj.Workbooks.Open(c:/test2.xls) Dim oSheet As New Object oSheet=oBook.Worksheet(1) obj.Quit()