Macro excel guardar hoja en archivo nuevo y con otra extensión

Necesito una macro para guardar una hoja de excel (la hoja activa) en un nuevo archivo.

No necesito que me pida confirmación ni que salga la ventana de guardar como, simplemente que genere un nuevo archivo en la misma carpeta que el archivo original.

Este nuevo archivo necesito que se guarde con una extensión distinta a la de excel y que yo pudiera incluir en el código VBA (txt, csv, kml,... Etc).

¿Es posible hacerlo)

2 Respuestas

Respuesta
1

Con esta macro guarda la hoja1 con el nombre de la hoja1 en la misma ubicación del archivo con formato .xls como esta en el código

Sub GuardarHoja()
  Dim Nombre As String
  Nombre = ThisWorkbook.Path & "\" & Sheets("Hoja1").Name & ".xlsx"
  Sheets("Hoja1").Copy
  ActiveWorkbook.SaveAs Filename:=Nombre, FileFormat:=xlOpenXMLWorkbook
  ActiveWorkbook.Close False
End Sub
Respuesta

Esto te aportará algo más

https://youtu.be/6kt_idZSqAk

https://youtu.be/DwynSW-n6HM

https://youtu.be/Of-hbkygZMQ

https://youtu.be/paVfYZlUygU

https://youtu.be/xYrTuuo2n3M

Aca tienes mas sobre como trabajar con archivos

https://www.youtube.com/playlist?list=PLdK9H5dMIfQiz99T-5wsxbEIHpi1s7s6S

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

How much does it cost to hire a professional app developer Dubai

Hello! If you have finally decided to have an app for your business, you need to look for a TOP MOBILE APP DEVELOPMENT AGENCY DUBAI. It doesn't matter if you are creating an app from scratch or re-launching the pre-existing one. You need to hire a...
11 respuestas

Puedo utilizar más de 258 caracteres en la instrucción DoCmd. ¿RunSQL?

Estoy utilizando un formulario de una tabla y quisiera que parte de esos datos se traspasaran a otra tabla, pero resulta que hasta ahora lo he hecho pero quiero traspasar más datos y la instrucción es tan grande que no la admite, ¿Se puede ampliar...
4 respuestas

Extraer de campo fecha el mes

Necesito el código para extraer de un capo fecha el mes en letra para insertarlo en otro campo se que no sera difícil pero la verdad no lo se mientras gracias por su ayuda
2 respuestas

No encuentro como usar bien la función sumar.si

He probado con el sumar. Si, y no encuentro la fórmula para que, en D1, me de la suma de B7:B18, sumada a la D7:D18, mientras que el mes de las celdas A7:A18 sea igual a Marzo. Y que en D2 hiciera lo mismo, pero para el mes de abril. Muchas gracias
1 respuesta

Boot para firmar pdf con firma digital

Tengo que firmar numerosos pdf's con firma digital, ¿Habría alguna manera de automatizar la tarea con un boot? La firma se realizaría siempre en la misma hoja dependiendo del documento, tengo dos tipos de documentos. Ejm: Documento 1 simpre la firma...
4 respuestas

Conocer en VBA donde se encuentran las bases de Datos

Necesito a través de VBA conocer el emplazamiento de las Bases de Datos.
3 respuestas

Poner registro ID de base de access en MsgBox

Estoy construyendo un userform para captura de datos, los cuales se almacenaran en una base de datos de access, el enviar la información del formulario de excel a la base de datos de access se genera un MsgBox que dice que la información de almaceno...
2 respuestas

Buscar un valor que coincida con dos nombres y en diferentes tablas

Necesito buscar un valor que proviene de una tabla dinámica que se va actualizando por mes y tiene dos características y buscar el valor en diferentes tablas.
Sin respuestas

Buscar un valor en un rango que coincida con dos nombres y en diferentes tablas

Necesito buscar un valor que viene de una tabla dinámica con dos características y hay que buscarlo dentro de un rango en diferentes tablas que coincidan con el nombre.
Sin respuestas

Como hacer que un campo de fecha sea numero

Una pregunta tengo un problemita tengo un campo fecha que al exportarlo a excel la fecha de quedar como numero les doy el ejemplo para ver si es posible y como se hace mientras gracias por su atención aquí en ejemplo esta es la fecha que se escribe...
2 respuestas