Colocar 2 calendarios en hojas diferentes dentro del mismo archivo
Tengo un archivo con 2 hojas "Asistencias" y "Datos", coloque 1 calendarios en ambas hojas, pero sucede en la hoja "Asistencia "que al querer colocar la fecha en el TextBox2 dentro del formulario surge un error (1004 en tiempo de ejecución: Error en el método select de la clase worksheet).
Y no se como resolver.
Por favor alguien tendrá algún link para poder consultar o bien indicarme como podre adjuntar mi archivo en esta pregunta.
2 respuestas
En el ModuloCalendario, en la macro que envía la fecha al formulario Asistencias, también la está enviando al formulario Registro que no está abierto aún.
'indicar ubicación de la fecha
Miformulario.TextBox1 = FechaRecibida
UF_Registrar.TextBox2 = FechaRecibida
Tenés que utilizar una variable (pública) al inicio de algún módulo (te la dejé en el ModuloCalendario) para indicar quién llama al calendario en cada caso. .
'INDICAR UBICACIÓN DE LA FECHA
If llamaF = 1 Then
Miformulario.TextBox1 = FechaRecibida
Else
UF_Registrar.TextBox2 = FechaRecibida
End If
llamaF = 0
End Sub
Y desde cada formulario, al llamar al calendar se indica el valor de la variable (1 o 2 o el nro de formularios que lo utilicen)
Private Sub CommandButton1_Click()
llamaF = 1 'Asistencias
frmCalendario.Show
End Sub
Nota: veo que estás utilizando los modelos de UF de los videos 6 y 27/28, qué bueno que te hayan servido.
Solo un detalle: las 2 subrutinas de los controles textbox para las fechas están llamando a otro calendar. Quitalas porque no te serán necesarias esas líneas.
Sdos.
Elsa
Otros videos para compartir macros:
Nº 9: https://www.youtube.com/watch?v=_jw5RNzHX_k&list=PLrhlyizWZzOERwRMxIIy-BTP-CyXh_K5N&index=80
Nº 75: https://www.youtube.com/watch?v=f_SMjRXRWjo&list=PLrhlyizWZzOERwRMxIIy-BTP-CyXh_K5N&index=13
Nº 86: https://www.youtube.com/watch?v=mk0cQR9kSEw&list=PLrhlyizWZzOERwRMxIIy-BTP-CyXh_K5N&index=2&t=61s
I. Hola Compañero, aunque en general haya de atenderle un experto quisiera trasladarle la información sobre este tema que vi por si pudiese serle de alguna utilidad y en especial ofrecerme para avisar a una persona conocedora de la comunidad de no llegar intervenciones durante la semana. Le ruego me disculpe todas las molestias de lectura y el tipo de respuesta, mucho ánimo.
https://www.youtube.com/watch?v=220rIA7lxZw
https://www-excelforum-com.translate.goog/excel-general/1096798-how-to-update-a-excel-calendar-from-other-sheets-in-the-same-workbook.html?_x_tr_sl=en&_x_tr_tl=es&_x_tr_hl=es&_x_tr_pto=sc
https://www.reddit.com/r/excel/comments/13ohmva/creating_a_master_calendar_that_draws_data_from/
https://www.youtube.com/watch?v=AEiJEX6JAWE
https://www.youtube.com/watch?v=N27-9egPcRA
¡Gracias! por tu tiempo
Saludos
I. Hola Compañero, muchas gracias :) ojalá un experto o experta pueda atenderle pronto mejor.