Elsa Matilde

Aquí creo que hay 2 situaciones diferentes: - Que siempre se tome el total que tiene esa celda en G2 (o la celda que sea de la otra hoja que no veo cómo se llama) - O que se ejecute una macro cada vez que 'cambie' el contenido de la otra hoja y se...

La función de conversión es CDBL. Pero debes evaluar primero si el textbox no quedó vacío de este modo: If TextBox15.value <> "" Then Hoja2.Cells(UFila, 20) =Cdbl(TextBox15.value)

Te envié un modelo que incluye registro y modificación con campos fecha. Con un Buscador, para tu seguimiento. Espero sean de utilidad, sino comentámelo sobre el mismo libro.

Te dejo un ejemplo para que puedas adaptarlo a tu fórmula. Podrás leer más desde mi Blog (dejo el enlace al pie) o en el video Nº 15 de mi canal (enlace al pie;) Caso 3: utilizar la sintaxis FORMULAR1C1: 'calcula a cuántas filas por encima de la 26...

Te dejo una macro obtenida con la grabadora, a la que le hice unos arreglos para que sirva para contemplar otras situaciones y dimensiones (*) Sub OrdenandoColumnas() 'x Elsamatilde 'se aplica filtros si aún no los tiene If ActiveSheet.AutoFilterMode...

Insertá un módulo y allí copiá el siguiente código: Sub CopiaHoja() 'macro extraída del manual 500Macros, cap 18: Trabajando con Libros. 'x Elsamatilde 'copio la hoja activa (CONSOLIDADO) ActiveSheet.Copy 'creamos un nuevo objeto Libro Set wb =...

Los controles TextBox guardan su información en formato 'texto' (aunque se vean como valores o fechas) Necesitas convertirlo a fecha de este modo. Se evalúa que no esté vacío el control, de lo contrario la función de conversión CDate dará error. If...

Me parece que te enredas por utilizar HOJA en lugar del nombre. En el video Nº 11 de mi canal (Mejoras en el código) comento este detalle a partir del minuto 3, con la solución recomendada. Por ahora, así quedó en tu libro: Private Sub...

En la apertura del libro te quedaron estos códigos. Allí debes modificar la letra de la col que de la Tabla3 (en lugar de E quedaría entonces F según me comentas.) Private Sub Workbook_Open() 'se trabajará sobre 3 hojas Dim UltFila As Integer MESact...

Desde mi Blog podrás descargar un planilla completa para Turnos. https://www.blogger.com/blog/post/edit/7837707101703779819/4069537799238881333 Está diseñada para todas las semanas de todos los meses de un año. Si bien parece más amplia de lo que...