Modificar datos de acuerdo a cada novedad
Dando alcance a la anterior consulta, solicito de su amable colaboración me ayuden a integrar la siguiente validación a la Macro que tengo actualmente.
Que cuando ocurra esta novedad de IRL o (Fecha inicio IRL) (Fecha final IRL) lo que necesito modificar o ajustar es cuando inserte fila en vez colocar una (X) en la columna AD ponga el # de días.
La segunda consulta es con referencia a la novedad SLN o (Fecha inicio SLN Fecha final SLN) lo que requiere es que cuando ocurra esta novedad y inserta la fila modifique las tarifas de acuerdo a valor que contenga la celda con base a la siguiente tabla.
2 respuestas
En el libro enviado encontrarás instrucciones (con las fechas de modificación) separando el tipo de dato y el resultado a obtener. Por ejemplo, al insertar la fila y recorrer el Array:
For a = LBound(novedad) To UBound(novedad) If InStr(novedad(a), dato) > 0 Then If a < 2 Or a = 4 Then Range(Cells(filx + 1, 61), Cells(filx + 1, 73)) = 0 'col BI:BU If dato = "SLN" Then 'cbios en SLN, col AT y BB:BC '26/05/2023 If Cells(filx + 1, 46) = 0.16 Then Cells(filx + 1, 46) = 0.12 If Cells(filx + 1, 54) = 0.04 Then Range(Cells(filx + 1, 54), Cells(filx + 1, 55)) = 0 ElseIf Cells(filx + 1, 54) = 0.125 Then Cells(filx + 1, 54) = 0.085 End If End If Else Range(Cells(filx + 1, 61), Cells(filx + 1, 63)) = 0 'col BI:BK End If Exit For End If Next a
Sdos.
Elsa
Tal vez te interese:
Curso de macros. Consejos para empezar a programar. - YouTube
Sal u dos
Dante Amor