Solved

In Excel how to add formula for Quintile?

Posted on 2016-10-05
4
110 Views
Last Modified: 2016-10-10
Ho can I calculate Quintile value (1,2,3,4,5) for value field.

Value             Quintile
1.61            1
1.67            1
1.79            1
2.19            2
2.20            2
2.27            2
2.28            2
2.28            3
2.45            3
2.45            3
2.57            4
2.58            4
3.07            5
3.38            5
0
Comment
Question by:Bharat Guru
  • 2
  • 2
4 Comments
 
LVL 27

Expert Comment

by:MacroShadow
ID: 41830800
Use this formula:
=MATCH(A2,PERCENTILE(A$2:A$15,{5,4,3,2,1}/5),-1)

Open in new window

0
 

Author Comment

by:Bharat Guru
ID: 41831796
Is above code will do below? If not I'm looking for something like below.

case   if cell("A2").value is between  PERCENTILE(A2:A15 , 0 ) and PERCENTILE(A2:A15 , .2 )
       1
case   if cell("A2").value is between PERCENTILE(A2:A15 , .2 ) and PERCENTILE(A2:A15 , .4 )
       2
 case   if cell("A2").value is between PERCENTILE(A2:A15 , .4 ) and PERCENTILE(A2:A15 , .6 )
       3
 case   if cell("A2").value is between PERCENTILE(A2:A15 , .6 )and PERCENTILE(A2:A15 , .8)
       4
 case   if cell("A2").value is between PERCENTILE(A2:A15 , .8 )and PERCENTILE(A2:A15 , 1 )
       5
0
 
LVL 27

Accepted Solution

by:
MacroShadow earned 500 total points
ID: 41832418
Try this function:
Public Function CustomQuintile(rngFirstCell As Range, strRange As Range) As Long
    If rngFirstCell.Value >= Application.WorksheetFunction.Percentile(strRange, 0) And rngFirstCell.Value < Application.WorksheetFunction.Percentile(strRange, 0.2) Then
        CustomQuintile = 1
    ElseIf rngFirstCell.Value > Application.WorksheetFunction.Percentile(strRange, 0.2) And rngFirstCell.Value < Application.WorksheetFunction.Percentile(strRange, 0.4) Then
        CustomQuintile = 2
    ElseIf rngFirstCell.Value > Application.WorksheetFunction.Percentile(strRange, 0.4) And rngFirstCell.Value < Application.WorksheetFunction.Percentile(strRange, 0.6) Then
        CustomQuintile = 3
    ElseIf rngFirstCell.Value > Application.WorksheetFunction.Percentile(strRange, 0.6) And rngFirstCell.Value < Application.WorksheetFunction.Percentile(strRange, 0.8) Then
        CustomQuintile = 4
    ElseIf rngFirstCell.Value > Application.WorksheetFunction.Percentile(strRange, 0.8) And rngFirstCell.Value <= Application.WorksheetFunction.Percentile(strRange, 1) Then
        CustomQuintile = 5
    End If
End Function

Open in new window


Then use this formula and drag it down:
=CustomQuintile(A2,$A$2:$A$15)

Open in new window

0
 

Author Closing Comment

by:Bharat Guru
ID: 41836944
Thanks
0

Featured Post

Master Your Team's Linux and Cloud Stack!

The average business loses $13.5M per year to ineffective training (per 1,000 employees). Keep ahead of the competition and combine in-person quality with online cost and flexibility by training with Linux Academy.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article descibes how to create a connection between Excel and SAP and how to move data from Excel to SAP or the other way around.
Do you use a spreadsheet like Microsoft's Excel?  Have you ever wanted to link out to a non excel file on your computer or network drive?  This is the way I found to do it!
This Micro Tutorial will demonstrate the scrolling table in Microsoft Excel using the INDEX function.
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…

778 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question