jcvelez

Elsa Matilde respondió: 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.

Elsa Matilde respondió: Te dejo el tramo del código donde se coloca la fórmula: With Tbl.ListRows.Add.Range .Cells = RngCS.Value If .Cells(6) = False Then .Cells(6).ClearContents Else .Cells(6) = "SI" .Cells(10).Select .Cells(10).FormulaR1C1 = "=[@Viaje]-[@[A CUENTA]]+[@[$...

Elsa Matilde respondió: Tal como te menciona Rafael, debes verificar en la Configuración de Windows, que tu región sea la que te corresponda. Luego revisá la configuración de la col Fechas en tu hoja. Debiera ser dd/mm/yyyy. Y también revisá las macros donde se estén...

Consultas Consultas respondió: Necesitmos seguir con el apoyo de Dante Amor

Elsa Matilde respondió: Tomo tu consulta. Ya te dejaré otra macro universal, ya que cada entrega se personalizó a tu modelo de hoja.

Elsa Matilde respondió: Para evaluar los títulos hay que mirar en qué se diferencian unas celdas de otras. Aquí ya no es letra vs número, sino que depende del 'largo' del texto que contengan. Por lo que utilizaré la función LEN Solo cambia la instrucción de control (If Not...

Elsa Matilde respondió: Primero debieras evaluar cuáles son tus rangos dependiendo del modelo. Para eso podrías dejar en un módulo este código. Te servirá para cualquier modelo. Public ini As Integer, fini As Integer Sub extremos() 'primera columna If [A13] = "" Then ini =...

Elsa Matilde respondió: Con fórmula sería como en la imagen: =EXTRAE(A1;6;HALLAR(" ";A1;6)-6) Con macro sería, también para A1, con esta instrucción: Range("C1").Formula = "=MID(A1,6,SEARCH("" "",A1,6)-6)" Solo debieras reemplazar A1 por la celda donde se encuentre el...