AddImage(sheet1, File.OpenInput(File.DirAssets, "addetti.png"), 14,riga,1,1)
Sub AddImage(wb As WritableSheet, bmp As InputStream, col As Double, row As Double, _
width As Double, height As Double)
Dim wi As JavaObject
wi.InitializeNewInstance("jxl.write.WritableImage", Array(col, row, width, height, Bit.InputStreamToBytes(bmp)))
Dim jo As JavaObject = wb
jo.RunMethod("addImage", Array(wi))
End Sub