Muy buen día estimados compañeros,

Escribo en esta ocasión, ya que no logro encontrar la respuesta a mi necesidad, por lo que recurro a este grandioso foro.

La situación es que necesito crear una copia de un libro de Excel habilitado para macros, que contiene macros y formularios, pero que esta copia se guarde en formato normal, es decir con extensión ".xlsx"

He encontrado un post aquí mismo en el foro, donde hablan de lo mismo, pero al hacer mis pruebas con la macro para eliminar el código VBA, simplemente no funciona, y al querer abrir nuevamente el archivo guardado con formato "xlsx" da error, y me indica que la extensión del archivo no es compatible. Al hacer la revisión del archivo, cambiándole la extensión a "xlsm", observo que todo el código y formularios aún siguen ahí. 

Es por esto que recurro a ustedes, para que me hagan favor de indicarme si estoy haciendo algo mal, o si hay alguna nueva opción para hacer lo que solicito.

Adjunto archivo de muestra, para que vean el código que he implementado, pero que sencillamente, no funciona.

Quedo atento a su pronta respuesta.

Guardar Copia.xlsmFetching info...

Hola @aaquino, no se si te estoy entendiendo, pero si lo que buscas es guardar una copia de tu archivo en formato xlsx, puedes usar la grabadora de macros y un guardar como, algo así con un poco de modificación:

Sub Macro1()
Dim ruta$, Nombre$
ruta = ThisWorkbook.Path & "\"
Nombre = Split(ThisWorkbook.Name, ".")(0)

ActiveWorkbook.SaveAs Filename:=ruta & Nombre, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
End Sub

 Saludos.

@aaquino , la parte importante de lo que te indica @AlexanderS es lo siguiente:

  En 6/5/2020 at 23:48 , AlexanderS dijo:

FileFormat:=xlOpenXMLWorkbook

Para que guarde en ".xlsx", pero con el formato "interno" propio... Cuando lo vuelvas a abrir ya no tendrá macros

Buen día estimados compañeros.

Muchas gracias por la ayuda. Algo tan sencillo, uno mismo se complica la vida. 

Pueden cerrar el tema.