B4J Question JPOI SetRange

micro said:

Why SetRange does not work properly?

Click to expand...

Erel said:

You should better describe what doesn't work for you.

Click to expand...

Sub AppStart (Form1 As Form, Args() As String)
    MainForm = Form1
    'MainForm.RootPane.LoadLayout("Layout1") 'Load the layout file.
    MainForm.Show
    Dim wb As PoiWorkbook
    wb.InitializeExisting(File.DirAssets, "template.xlsx", "")
    Dim s1 As PoiSheet = wb.GetSheet(0)    'unica sheet
    Dim i As Int
    For i = 1 To 20     ' bar displayed, but is not so
        Dim row As PoiRow = s1.CreateRow(i)
        row.CreateCellString(0, "Name" & i)
        row.CreateCellNumeric(1, Rnd(100, 1000))
    Next
    SetNamedRange(wb, "sheet1", "Range_name", "$A$2:$A$" & 20) 'set the range
    SetNamedRange(wb, "sheet1", "Range_pieces", "$B$2:$B$" & 20)
    wb.Save(File.DirApp, "Chart.xlsx")
    wb.Close
    fx.ShowExternalDocument(File.GetUri(File.DirApp, "Chart.xlsx"))
End Sub

Daestrum said:

I ran your code from post #1 and both ranges are being created, could it be the code you use to generate the graphics is where the problem lies?

Click to expand...

Daestrum said:

After I edited the data range for the graph to Range_name;Range_pieces all the columns were visible.

Click to expand...