Dichiarazione :
Dim MyXL As excel.Application
Dim ExcelWasNotRunning As Boolean
On Error Resume Next
Set MyXL = GetObject(, "Excel.Application")
DetectExcel
If file_appoggio = 1 Then
Else
Set MyXL = CreateObject("excel.application") 'p
file_appoggio = 1
End If
Set MyXL = MyXL.Workbooks
carica_excel '<---------------------------------------
MyXL.Quit
-----------------------------------------
Caricamento xls:
Cells.Select
Selection.ClearContents
Qui mi genera l'errore ( su Cells.select ). questo è l'errore che mi
da : Metod "Cells" of object "_Global" failed. err 1004.
Spero di essere stato chiaro.
NON SO PIU COSA FARE.AIUTATEMI PER FAVORE!!!!!!
Grazie mille