B4J Question Read data from Excel

[besoft]

Hi

I would like to read from excel file in a specific sheet data from a known cell range. These data will be written in oracle database. Writing in the Oracle database and read from the database works. Does anyone have any example of how to implement it. I watched jPOI library, but I do not know how to begin reading data from the excel table.

 

[DonManfred]

https://www.b4x.com/android/forum/threads/jexcel-library.35004/ ?

 

[Erel]

I recommend you to use the jPOI library: https://www.b4x.com/android/forum/t...microsoft-excel-xls-and-xlsx-workbooks.57392/

Post the code that you are trying and explain what is not working for you.

 

[besoft]

Thanks for the reply
I apologize for the late reply, I had another job. Currently I do not have any code to work excel files. I was planning to use jPOI library because the file type * .xlsx.
I have to study for example in the forum. I would like to read the names of the worksheets from the files. These names are the key data to be stored in the database. Then the contents of the worksheet in a given area.
Can anyone make an example using jPOI library, of course, for a fee.
I have very little time for research because a lot of other work in the workplace.

 

[DonManfred]

Can anyone make an example using jPOI library, of course, for a fee.

Sub Process_Globals
    Private fx As JFX
    Private MainForm As Form
    Private poi As PoiWorkbook
End Sub

Sub AppStart (Form1 As Form, Args() As String)
    MainForm = Form1
    MainForm.SetFormStyle("UNIFIED")
    'MainForm.RootPane.LoadLayout("Layout1") 'Load the layout file.
    'poi.InitializeExisting(File.DirAssets,"Mappe1.xls","")
    poi.InitializeExistingAsync("Excel",File.DirAssets,"Mappe1.xls","")
    MainForm.Show
End Sub
Sub Excel_Ready (Success As Boolean)
    If Success Then
        Log("No of Sheets: "&poi.NumberOfSheets)
        For i = 0 To poi.NumberOfSheets-1
            Dim sheet As PoiSheet = poi.GetSheet(i)
            Log(sheet.Name)
        Next
        Dim sheets() As Object = poi.GetSheetNames
        Log(sheets)
       
    End If
End Sub

 

[besoft]

Thanks for the reply.

Where can I donate ..or otherwise pay off ..

Today, late in the evening I will try to read the content of excel file.

 

[DonManfred]

Where can I donate ..or otherwise pay off ..

 

[DonManfred]

Today, late in the evening I will try to read the content of excel file.

If you have more questions; let me know

 

[ta1dr]

hi
I have excel file I want to read cell like a sheet1.cells(1,2) also write
how can I do it ?

 

[DonManfred]

I have excel file I want to read cell like a sheet1.cells(1,2) also write
how can I do it ?

You should start with a new thread.
Give us enough informations on what you already done.

See this thread on how to do.