Función Similar a Subtotal

[Mauricio_ODN]

Hola a todos

Primero que nada deseo agradecer el tiempo en leer este post, Muchas Gracias.

Me acerco a ustedes para pedir su ayuda para lo siguiente:

Tengo una UDF, la cual tiene dos escenarios:

1.- Si Tiempo Promedio y Duración del Video son diferentes de 0, hacer el calculo

2.- Si lo anterior es igual a 0, se realiza el otro calculo por cuartiles.

El detalle es que son muchas celdas a seleccionar, lo cual creo puede ser engorroso, entonces, pensando en simplificar la función, me pregunte si fuera posible:

a.- Colocar 1 al principio de la función y después solo seleccionar 2 celdas correspondientes (Rango continuo o discontinuo)

b.- Colocar 2 al principio de la función y después seleccionar las 5 celdas correspondientes (Rango continuo o discontinuo)

Espero me puedan ayudar y/o orientar al respecto, quedo atento para cualquier duda, de antemano les agradezco cualquier ayuda brindada. Mil Gracias!!

Media Attention Formula 1.1.xlsb

 

[Antoni]

He analizado la UDF y entiendo perfectamente lo que hace, lo que no entiendo es lo que pretendes hacer.

Mejor sube un ejemplo resuelto de  como debería funcionar la UDF con los nuevos parámetros solicitados. 

[Mauricio_ODN]

Hace 1 hora, Antoni dijo:

He analizado la UDF y entiendo perfectamente lo que hace, lo que no entiendo es lo que pretendes hacer.

Mejor sube un ejemplo resuelto de  como debería funcionar la UDF con los nuevos parámetros solicitados. 

Gracias tomarse el tiempo de leer por responder Maestro @Antoni

Adjunto el archivo con la idea a la que deseo llegar, sigo atento.

Mil gracias por el tiempo y la ayuda brindada

 

Media Attention Formula 1.2.xlsb

[Antoni]

No va a ser necesario distinguir el tipo de proceso entre 1 y 2.

Revisa el adjunto a ver si es eso lo que quieres.

Function MediaAttention(mImp As Range, _
                        q25 As Range, q50 As Range, _
                        Optional q75 As Range, _
                        Optional q100 As Range) As Double
'-- Opción 1
   If q75 Is Nothing And q100 Is Nothing Then
      MediaAttention = q25 / q50
      Exit Function
   End If
   
'-- Opción 2
   MediaAttention = ((0.25 * (q25 - q50)) / mImp) + _
                    ((0.5 * (q50 - q75)) / mImp) + _
                    ((0.75 * (q75 - q100)) / mImp) + _
                    (q100 / mImp)
End Function

 

Media Attention Formula 1.2.xlsb

[Mauricio_ODN]

En 28/3/2024 at 4:09 , Antoni dijo:

No va a ser necesario distinguir el tipo de proceso entre 1 y 2.

Revisa el adjunto a ver si es eso lo que quieres.

Function MediaAttention(mImp As Range, _
                        q25 As Range, q50 As Range, _
                        Optional q75 As Range, _
                        Optional q100 As Range) As Double
'-- Opción 1
   If q75 Is Nothing And q100 Is Nothing Then
      MediaAttention = q25 / q50
      Exit Function
   End If
   
'-- Opción 2
   MediaAttention = ((0.25 * (q25 - q50)) / mImp) + _
                    ((0.5 * (q50 - q75)) / mImp) + _
                    ((0.75 * (q75 - q100)) / mImp) + _
                    (q100 / mImp)
End Function

 

Media Attention Formula 1.2.xlsb 22.1 kB · 1 descarga

Maestro @Antoni,  le agradezco en verdad, muchísimas gracias, es justo o que necesitaba.

Sin no hubiera otro comentario, se puede dar por cerrado este post, de antemano, mil gracias,