no come fai tu non va bene
perche va in obliquo la cancellazione
io facendo in quest'altro modo:

For Yx = 1 To 100 'massivo numero di celle
For a = 1 To 100
FoglioExcel.Cells(Yx, a).Value = "" 'lecancello
Next a
Next Yx

neanche me le cancella(che per me dovrebbe essere giuisto)