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.

Respuesta
3

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 

1 respuesta más de otro experto

Respuesta
1

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-mrexcel-com.translate.goog/board/threads/creating-a-calendar-by-matching-names-and-dates-from-multiple-sheets.1234970/?_x_tr_sl=en&_x_tr_tl=es&_x_tr_hl=es&_x_tr_pto=sc 

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://stackoverflow-com.translate.goog/questions/57654453/how-can-i-sync-different-multiple-calendars-from-one-google-sheet?_x_tr_sl=en&_x_tr_tl=es&_x_tr_hl=es&_x_tr_pto=sc 

https://www-process-st.translate.goog/how-to/include-calendar-for-multiple-sheets-in-smartsheet/?_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 

https://superuser-com.translate.goog/questions/1839662/how-can-i-count-paid-time-off-entries-on-multiple-calendars?_x_tr_sl=en&_x_tr_tl=es&_x_tr_hl=es&_x_tr_pto=sc 

https://www.youtube.com/watch?v=tzau64V6XcQ 

https://www.youtube.com/watch?v=0DXtazISG2w 

¡Gracias! por tu tiempo

Saludos

I. Hola Compañero, muchas gracias :) ojalá un experto o experta pueda atenderle pronto mejor.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas