Nombre de archivo

Hola Valedor:
Gracias por compartir tus conocimientos con nosotros.
Mi inquietud es la siguiente:
En una celda cualquiera tengo una fórmula que concatena otras varias; deseo que al darle click a un botón "salvar" (creado), lo haga solo con el nombre que está contenido en la celda que contiene la concatenación.
Gracias valedor y feliz navidad para ti y los tuyos!
Att:hiniciado

1 Respuesta

Respuesta
1
Supongo que te refieres a guardar el libro con un nuevo nombre, si es así usa lo siguiente...
Public Sub Guardar()
Dim strRuta As String
If Trim(Range("A1").Value) Then
strRuta = ActiveWorkbook.Path & Application.PathSeparator & Trim(Range("A1").Value) & ".xls"
If strRuta <> "" Then
ActiveWorkbook.SaveAs strRuta
End If
End If
End Sub
Esto te guardara en la misma ruta donde este el libro activo, con el nombre que este en la celda A1, siempre y cuando no este vacía, saludos...
Mauricio Baeza
[email protected]
Todo lo que no es dado es perdido
*==========================================*
La presente respuesta ha demandado un tiempo de lectura,
análisis, elaboración y redacción. A cambio, simplemente,
pretendo que te tomes un minuto para FINALIZARLA, si
hubiera satisfecho -en alguna medida- tu requerimiento.
En caso contrario, puedes preguntarme nuevamente
aclarando qué entendí mal o qué faltó.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas