Macro guardar rango en otro archivo o libro
Hola, necesito un favor, lo que quiero hacer es una macro que tome de la hoja llamada lenguaje, el rango desde d5:ab:55 y lo guarde como otro archivo o libro con el nombre de la hoja y la fecha (lenguaje); seria como extraer solo la información de ese rango de celdas para guardarlo en un archivo aparte... Agradecería mucho su ayuda, ya que soy principiante en esto de las macros y no loro dar con el código
1 Respuesta
Respuesta de Dante Amor
1
Sigue las Instrucciones para ejecutar la macro
1. Abre tu archivo de excel
2. Para abrir Vba-macros y poder pegar la
macro, Presiona Alt + F11
3. En el menú elige Insertar / Módulo
4. En el panel del lado derecho copia la macro
5. Para ejecutarla presiona F5
Sub guardarrango()
'Por.DAM
Set l1 = ThisWorkbook
Set h1 = l1.Sheets("lenguaje")
Set l2 = Workbooks.Add
Set h2 = l2.ActiveSheet
h1.Range("D5:AB55").Copy h2.Range("D5")
ruta = l1.Path
archivo = h1.Name & "-" & Format(Day(Date), "00") & "-" & _
Format(Month(Date), "00") & "-" & Year(Date)
l2.SaveAs ruta & "\" & archivo
l2.Close
MsgBox "Archivo creado"
End Sub
