Buenos días
Tengo un libro de excel con un VBA que necesito mover a Power BI. El código me permite calcuar instancias de ausencia.
Los datos están ahora en Power BI, ¿puede usar el VBA en BI?
VBA de Excel actual:
Sub Instance()
Dim sRange como rango
Dim cel como rango
Dim nexts como rango
Set sRange = Rango("G2:AAJ900")
Para cada cel en sRange.Cells
Si cel. Valor = "S" y cel. Offset(, 1). Valor = "RTO" Entonces
Con sRange.Rows(cel. Fila - sRange.Cells(1). Fila + 1)
Establecer c = . Find("S", LookIn:=xlValues, LookAt:=xlWhole)
Establecer c = . FindNext(cel)
Si cel. Fila = c.Row Entonces
If Application.CountIf(Range(cel, c), "RTO") = (Range(cel, c). Columns.Count - 2) A continuación,
Rango (cel. Offset(, 1), c.Offset(, -1)) = "S"
Terminar si
Terminar si
Terminar con
Terminar si
próximo
Fin del sub
