☰

Comprobando el valor de la columna. Si es verdadero, marque la misma fila en otra columna y cuente si no está en blanco.

tag-icon • tag-icon microsoft-excel worksheet-function microsoft-excel-2003
Comprobando el valor de la columna. Si es verdadero, marque la misma fila en otra columna y cuente si no está en blanco.

Tengo una hoja de cálculo de empleados. La columna A es una lista de tipos de departamento (ventas, recursos humanos, nómina, etc.). La columna B es la fecha en que se completó su evaluación, o en blanco si está incompleta. Me gustaría una función que verifique la columna Departamento para un tipo de departamento particular (por ejemplo, "Ventas") y, si es igual a "Ventas", verifique las filas correspondientes de la columna Evaluación y cuente cuántas fechas. Luego replicaría para todos los demás tipos de departamento. Entonces, para el ejemplo de "Ventas", si hay cuatro empleados y dos tienen fecha de evaluación, el resultado sería "2". Teniendo en cuenta que no quiero que cuente las fechas en la Columna B relacionadas con los otros tipos de Departamento.

Columna A - departamento . . . . - RRHH - Ventas - RRHH - Nómina - Ventas - Ventas - Ventas.

Columna B - Evaluación- 07/01/2015 - 07/08/2015 - 07/06/2015 - "En blanco" - "En blanco" - 07/03/2015 - "En blanco" -

Respuesta1

Abra el Editor VBA, luego elija Módulo en el menú Insertar. Pegue lo siguiente en el campo de texto resultante:

Function DEPTAPPCOUNT(Dept As String, Range As Range, CountRange As Range) As Integer
    Dim count As Integer
    For Each rCell In Range
        If rCell.Text = Dept Then
            If rCell.Offset(0, 1).Text <> "" Then count = count + 1
        End If
    Next
    DEPTAPPCOUNT = count
End Function

Presione el botón Guardar en la barra de herramientas, luego cierre el Editor VBA para regresar a su hoja de cálculo. Ahora puede utilizar la DEPTAPPCOUNTfunción como las funciones intrínsecas de Excel. Si la columna de su departamento abarca de A2 a A7 (y las fechas de tasación están en B2 a B7; la columna contada debe estar inmediatamente a la derecha de la columna de departamento para que esta función funcione), ingrese =DEPTAPPCOUNT("Sales", A2:A7, B2:B7)para obtener el número de entradas de ventas sin -fechas de tasación en blanco. Ajuste el primer parámetro (el Salestexto) como desee para contar en otros departamentos.

Si tiene Excel 2007 o una versión posterior, deberá guardar la hoja de cálculo en XLSMformato (habilitado para macros).

Para aquellos que se preguntan por qué CountRangese debe pasar a la función personalizada aunque no se use, es necesario que Excel vuelva a calcular el recuento si se cambia la columna de fecha. En otras palabras, pasar el rango adicional a la función crea una dependencia en los cálculos de Excel.

información relacionada