Ciao e grazie per avermi risposto , gli oggetti li ho dichiarati così :

dim oexcel as object
dim obook as object
dim osheet as object