Visual Basic - Ayuda con el objeto Excel

Tengo el siguiente codigo :
Partimos del hecho que no sabemos si el fichero donde vamos a exportar los datos existe o no, alguién me puede decir como puedo controlar si existe el fichero o no mediante metodos o propiedades del objeto excel o mediante alguna API de windows.

Muchas Gracias
-----------------------------------------------

Private Function Exportar(Data() As Variant, Fichero As String) As Boolean
Dim xlApp As Excel.Application
Dim wkb As Excel.Workbook
Dim wkbSheet As Excel.Worksheet
Dim Rng As Excel.Range
Dim fila As Integer
Dim columna As Integer
On Error GoTo tError
Exportar = False
Set xlApp = New Excel.Application
Set wkb = xlApp.Workbooks.Add
Set wkbSheet = wkb.Worksheets(1)
Set Rng = wkbSheet.Range("A1:" + Chr(vaPlantilla.MaxCols + 64) + CStr(vaPlantilla.DataRowCnt + 1))
For fila = 0 To UBound(Data, 1)
For columna = 0 To vaPlantilla.MaxCols - 1
wkbSheet.Range(Chr(columna + 1 + 64) + CStr(fila + 1)) = CStr(Data(fila, columna))
Next
Next

For columna = 1 To vaPlantilla.MaxCols
wkbSheet.Range(Chr(columna + 64) + CStr(1)).Interior.color = &H99EEEE
Next
'No sabemos si el fichero existe o no
wkb.SaveAs Fichero
wkb.Close True
xlApp.Quit
Exportar = True

Set wkb = Nothing
Set wkbSheet = Nothing
Set xlApp = Nothing
Set Rng = Nothing
.......

Puedes hacer esto, cuando mandas el parametro hacia el Fichero si viene con la Ruta completa debes de hacer solamente esto:
If Dir(Fichero, vbArchive) <> "" Then
Kill Fichero
End If
si viene solamente con el nombre debes acompletar la ruta en caso de que estes almacenando en un directorio especifico,
Ruta = "C:\ArchivosExcel" & "\Fichero.xls"
If Dir(Ruta, vbArchive) <> "" Then
Kill Ruta
End If
Si no puedes adaptarlo te paso un ejemplo a tu correo...saludos!!!