Armar un string con variables
Publicado por Angel (5 intervenciones) el 03/04/2018 00:02:43
Hola a todos y desde ya muchas gracias. Quiero normalizar los nombres de los archivos creados en Excel y además que siempre se guarde en el mismo directorio. Para ello pensé en una macro como la que sigue:
Mi pregunta radica en en el tramo de código ""C:\Cierre\Cierre&mes&anio&.xlsm"", dónde las variables mes y anio guardan del valor de dos celdas que irán cambiando mes a mes que se produce el informe. Así el archivo se guarda como Cierre&mes&anio&.xlsm y no como por ej. Cierre318.xlsm que correspondería a marzo de 2018.
1
2
3
4
5
6
7
8
9
10
Sub GuardarLibro()
' Utilizo dos variables para guardar el año y la semana correspondiente
Dim mes, anio As Stringmes = Worksheets("Hoja1").Range("A1").Value
anio = Worksheets("Hoja1").Range("A2").Value
'Armo el directorio destino
ActiveWorkbook.SaveAs Filename:="C:\Cierre\Cierre&mes&anio&.xlsm", _
FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
End Sub
Valora esta pregunta
0
