¿Cómo puedo crear un botón guardar en vb excel y que lo registre en excel?
Quiero crear un botón guardar eb visual basic, que al ingresar un nombre lo registre en una de las celdas de excel... Como lo puedo hacer
3 respuestas
.03/10/16
Buenas tardes, Javier
En realidad, hay una fórmula que te dá el nombre del archivo que debería estar antes de grabar el archivo
Donde quieras que aparezca tal nombre, escribe la siguiente fórmula:
=CELDA("Filename";A28)
[Considera si usas comas o punto y coma para separar argumentos de las funciones. Yo usé ";"]
A28 es cualquier celda, distinta de dónde colocaras la fórmula.
Esta fórmula tomará el nombre del archivo que le indiques cuando lo grabes.
Luego, casi que ni es necesaria una macro para grabar el archivo porque haría lo mismo que cualquiera de las opciones nativas para grabar que ya trae MS Excel.
De todos modos, si aún asi necesitas una rutina VBA para hacerlo, utiliza esta:
Sub GrabaArch()
Exten = "xlsm"
Donde = Application.GetSaveAsFilename("nombre", , , "INGRESAR DESTINO DE ARCHIVO DE TEXTO")
Donde = Donde & IIf(Right(Donde, Len(Exten)) = Exten, "", Exten)
ActiveWorkbook.SaveAs Filename:=Donde
End Sub
Luego puedes agregar un botón de ejecución de esta macro insertando uno en tu hoja. Luego, haz click derecho sobre él y eligiendo "Asignar macro". La lista de macros disponibles te permitirá asignación GrabaArch a ese botón. Finalmente, en propiedades, podrás quitarle la marca para que el botón no se imprima.
Quizás este link te sirva
http://www.programarexcel.com/2013/03/formulario-vba-para-insertar-datos.html
acá te dejo cientos de ejemplos que puedes usar con formularios
http://www.programarexcel.com/p/userform.html