Ciao a tutti,
ho un codice all'apertura di un report, che scrive dei valori in alcune celle di un file excel, poi legge il risultato di alcuni campi calcolati.
Non mi serve salvare il file.
Il problema é che quando spengo il computer mi viene l'arressto é bloccato dal processo excel che rimane aperto.
Questo é il codice che ho utilizzato
cosa dimentico?
Dim programma As Excel.Application
Dim cartella As Excel.workbook
Dim foglio As Excel.Worksheet
Set programma = CreateObject("excel.application")
Set cartella = programma.Workbooks.Open("C:\test\calculator.xlsx")
Set foglio = cartella.Sheets(1)
foglio.Cells(6, 4) = Me.txtmed
Report1!txtMCC = Format((foglio.Cells(15, 11) * 100), "0.000")
cartella.Close SaveChanges:=False