Error 1004 con Select Case
Publicado por Ivana (5 intervenciones) el 28/06/2019 19:58:40
Bue día! Por favor, podrían ayudarme a ver dónde está el error en el siguiente código.
Primero explico lo que necesito lograr: Tengo dos hojas (formulario y Auxiliar), en la hoja Auxiliar dentro del la celda E2 va ir figurando 1 día de la semana (Lunes, Martes, Miércoles...). No es estático, va ir cambiando a medida que vaya completando el registro.
Necesito que detecte que día es y que ejecute una determinada macro. ósea, si dice Lunes que ejecute la "macro Lunes". Por ahora estoy probando hasta el Martes y me arroja el error 1004.
Utilice Selec Case porque son 5 las posibilidades, los cinco días hábiles de la semana.
No encuentro donde está el error. Por favor, podrían ayudarme? Gracias
Primero explico lo que necesito lograr: Tengo dos hojas (formulario y Auxiliar), en la hoja Auxiliar dentro del la celda E2 va ir figurando 1 día de la semana (Lunes, Martes, Miércoles...). No es estático, va ir cambiando a medida que vaya completando el registro.
Necesito que detecte que día es y que ejecute una determinada macro. ósea, si dice Lunes que ejecute la "macro Lunes". Por ahora estoy probando hasta el Martes y me arroja el error 1004.
Utilice Selec Case porque son 5 las posibilidades, los cinco días hábiles de la semana.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub Día()
Dim ValorCelda As String
Dim Lunes As String
Dim Martes As String
Worksheets("Auxiliar").Range(2, 5).Value = ValorCelda
Select Case ValorCelda
Case Is = LunesCall Módulo2.LunesCase Is = MartesCall Módulo3.MartesEnd Select
End Sub
No encuentro donde está el error. Por favor, podrían ayudarme? Gracias
Valora esta pregunta
0
