Macro para sacar porcentaje en hoja excel
Necesito una macro que cuente las veces que se repite un numero en dicha columna ejemplo el numero 0 se repite 5 veces en la columna D a ese resultado multiplicarlo por el numero 20 que es la cantidad de celdas de la columna D y dividirlo entre 100 o sea sacarle el porcentaje seria asi: 5x20/100=1,0 % ademas seria bueno tambien que pudiera hacer la misma operacion pero con las dos ultimas o dos primeras agradezco su colaboracion
1 Respuesta
Respuesta de William Kennedy
1
Puedes probar con esta función
Function Porcentaje(ByVal column As String, ByVal Criteria As String) Dim Count As Integer Dim Search As Integer Search = Application.WorksheetFunction.CountIfs(ThisWorkbook.Sheets(1).Columns(column), Criteria) Count = Application.WorksheetFunction.CountA(ThisWorkbook.Sheets(1).Columns(column)) Porcentaje = (Search * Count) / 100 End Function
Esto funcionaria como una formula, la cual podrias llamar desde una celda de excel indicando la columna en la que quieres buscar (entre comillas) y el criterio de busqueda
unicamente debes de pegar dicha function en un modulo.
