Buongiorno Gibra,

grazie per il tuo intervento, come sempre preciso, professionale e risolutivo.


Spero che tu abbia fatto l'inverso.
... purtroppo no.

più che altro perchè dopo che il cliente ha iniziato ad usarlo, è riuscito a far in modo che il pc aprisse i documenti office con il 365 e non con il suo 2007 [me lo hanno dato loro per l'installazione, per cui non so dirti se è 32 o 64, ma penso 32 visto che mi punta alla cartella program file (x86)]

fai il ripristino
Non vedo tra i punti di ripristino quello relativo alla disintallazione di 365 (strano, mi va indietro solo di un paio di giorni, e il cliente ci sta lavorando da 15gg circa)

Sarò costretto a fare la copia di tutti i documenti e ripristino di fabbrica, non c'è altro modo, vero, di risolvere il danno fatto.

Grazie e saluti

P.S: nel frattempo ho provato a sostituire l'istruzione incriminata
codice:
  
   Set appex = New Excel.Application  ' su questa istruzione esce l'errore
 

   Set carex = Excel.Workbooks.Add
    Set fogex = Excel.Worksheets(1)
con

codice:
Set app_exc = CreateObject("Excel.Application")
   Set carex = Excel.Workbooks.Add
    Set fogex = Excel.Worksheets(1)
e una prima volta mi ha funzionato ma si è bloccata poi su

fogex.Cells(1, 1) = "(1) Numero cartella"
dando lo stesso errore
e poi ha iniziato a bloccarsi su
codice:
Set carex = Excel.Workbooks.Add
Ho voluto lo stesso farVi partecipe dei tentativi finora fatti

Ora torno a... ripristinare il tutto.
Grazie ancora.