Te lo riporto anche qui il codice per cancellare il contenuto di una selezione in un foglio di XL xke' non so' se sull'altro 3d (dello con DarkblOOd) l'hai visto.

codice:
Dim xlApp      As Excel.Application
Dim xlWB       As Excel.Workbook
Dim xlWS       As Excel.Worksheet

'.....
   Set xlApp = New Excel.Application
   xlApp.Visible = False
   xlApp.DisplayAlerts = False
   Set xlWB = xlApp.Workbooks.Open("c:\test1.xls")
   Set xlWS = xlWB.Worksheets.Add
   For Each xlRng In xlWS.Range("A110")
       xlRng.Value = ""
   Next xlRng
   xlWB.Close True, "c:\test1.xls"
   Set xlWS = Nothing
   Set xlWB = Nothing
   xlApp.Quit
   Set xlApp = Nothing
Ciao.