Dim nomefile As String = $"xxxx${DateTime.Date(DateTime.Now)}.xlsx"$
wb.Save(File.DirApp, nomefile)
wb.Close
Sleep(1000)
'OK FOR MAC
fx.ShowExternalDocument(File.GetUri(File.DirApp, nomefile))
cutils.ShowNotification3("",$"FILE CREATO CON IL NOME ${nomefile} PRESENTE NELLA CARTELLA:
${File.DirApp}"$, cutils.ICON_CONFIRM, MainForm, "BOTTOM_RIGHT", 9000)
CRASH ON MAC
B4X:
Dim nomefile As String = $"xxxxx${DateTime.Date(DateTime.Now)}.xlsx"$
wb.Save(File.DirApp, nomefile)
wb.Close
Sleep(1000)
cutils.ShowNotification3("",$"FILE CREATO CON IL NOME ${nomefile} PRESENTE NELLA CARTELLA:
${File.DirApp}"$, cutils.ICON_CONFIRM, MainForm, "BOTTOM_RIGHT", 9000)
Private xl As XLUtils
xl.Initialize
Wait For (xl.OpenExcel(nomefile)) Complete (Success As Boolean)
Log("Eseguito")