Visual Basic para Aplicaciones - Ayuda, guardar archivo de Excel (existente)

hola, tengo un problema estoy haciendo un programa en vb 6.0, donde mando reporte a hojos de calculo de excel , donde hay dos opciones, una para ver la hojade calculo, y otra para guardarla, el problema es al guardar una hoja excistente me sale un mensaje de excel que el archivo ya exciste cuando hago clic en no, me sale un error :

Error en el objeto 'SaveAs' del objeto '_workbook'

alguien me puede ayudar, gracias

If MsgBox(strMsg, vbQuestion + vbYesNo) = vbYes Then
strFilter = sFilter = "Hoja de Calculo|*.xls"
cdlgMain.Filter = strFilter
cdlgMain.FileName = "Rep"
cdlgMain.ShowSave

If cdlgMain.FileName <> "" Then
xls.SaveAs (cdlgMain.FileName) '<----aca sale el error cuando ya existe el archivo
strMsg = "Los datos del reporte se han guardado en un archivo: " & vbCrLf & vbCrLf
strMsg = strMsg & cdlgMain.FileName
MsgBox strMsg, vbExclamation, "Hoja de calculo guardada"

End If
End If