Actividad pública reciente
Ha valorado "Buena" la respuesta
Copiar libro y cambiar el nombre mediante botón.
Para copiar un archivo puedes utilizar lo siguiente: Sub Copiar_Plantilla() 'Por.Dante Amor ruta = ThisWorkbook.Path & "\" arch = "plantilla.xlsx" If Dir(ruta & arch) = "" Then MsgBox "El archivo plantila no existe" Exit Sub End If nuevo =...
Ha empezado a seguir el tema Bases de datos