Visual Basic para Aplicaciones - CAMBIO SENTENCIAS EN UNA MACRO

Life is soft - evento anual de software empresarial
 
Vista:

CAMBIO SENTENCIAS EN UNA MACRO

Publicado por Antonio Ortega (2 intervenciones) el 28/02/2018 11:23:23
Tengo una macro en la que hay sentencias referidas al nombre de un archivo, ejemplo: datos02.xlsm
Hay un montón de archivos referidos al numero de mes, en este caso el correspondiente a febrero 02.
Todos los meses tengo que ir macro por macro y cambiar 02 por 03, asi cada primero de mes.
MI PREGUNTA, HAY ALGUNA FORMA AUTOMÁTICA, MACRO, QUE ME CAMBIE EL NUMERO DE MES SIN TENER QUE IR ARCHIVO POR ARCHIVO
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Antoni Masana
Val: 1.134
Oro
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

CAMBIO SENTENCIAS EN UNA MACRO

Publicado por Antoni Masana (498 intervenciones) el 28/02/2018 12:41:44
Hay un montón de formas de hacerlo.

Te cuento TRES Formas

1.- Usando una celda donde poner el valor

1
File = "datos" & Format(Range("A1")  & ".xlsm"

2.- Una variable pública.

1
File = "datos" & MES & ".xlsm"

3.- Preguntarle al sistema. Es válida si la actuación la haces el mismo mes, mañana ya no sirve para febrero.

1
File = "datos" & Format(Month(Date), "00")  & ".xlsm"

Supongamos que mañana sigues teniendo que procesar Febrero mientras no tengas ficheros de Marzo

1
2
File = "datos" & Format(Month(Date), "00")  & ".xlsm"
IF Dir(File) = "" Then File = "datos" & Format(Month(Date - Day(Date)), "00")  & ".xlsm"

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar