Le agregué esto:
Código:
Dim xlNormal As Long
xlNormal = -4143
ApExcel.ActiveWorkbook.SaveAs FileName:=App.Path & "\Libro2.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False
Funciona bien, pero ¿cómo hago para que no me pregunte si deseo reemplazarlo?
Saludos y gracias