Populate Textbox with excel cell value

ColbyParnell — Thu, 30 Dec 2010 18:53:41 GMT

Is this possible.

I can open the excel file i want to get the data from but im not sure how to get the corrisponding values into the user form.

Code i have to open excel via button click:

Private Sub OpenNewWarrant()
Dim VolDate As Date
Dim xlApp As Object    
    Set xlApp = CreateObject("excel.application")
    xlApp.Visible = True
    Set myfile = xlApp.Workbooks.Open("C:\AirPhoto\Test.xls") 'etc...
    Set xlApp = Nothing    ' the application, then release the reference.

End Sub

Im thinking something like this but obviously it needs to be tweaked...

 tb6.Value = myfile.Workbooks.ActiveSheet("C8").Value

Re: Populate Textbox with excel cell value

ColbyParnell — Sat, 11 Dec 2021 20:36:16 GMT

Ok so if i open the file and populate right away this works like a charm:

Private Sub CommandButton1_Click()
Dim xlApp As Object
Dim myfile As ExcelWorkspaceFactory


    Set xlApp = CreateObject("excel.application")
    xlApp.Visible = True

    Set myfile = xlApp.Workbooks.Open("C:\AirPhoto\Test.xls")
    tb6.Value = xlApp.ActiveWorkbook.Sheets("sheet1").Range("C8").Value

But if i change something in the cell and try to update it returns an error of: runtime error 91 Object variable or with block variable not set

topic Populate Textbox with excel cell value in ArcObjects SDK Questions

Populate Textbox with excel cell value

Re: Populate Textbox with excel cell value