Add 5 Star Rating to cell

what do you want to happen when "stars"clicked then?

If I were to click the 3rd star, i wanted to see 3 filled yellow stars, and two empty stars.

If I clicked the 1st star I wanted to see 1 filled yellow star and 4 empty stars.

Thanks alot for the help and consideration. I wanted one more complex than just using the wingdings font.

You would have to use five separate cells and some VBA. There's no way to tell where you clicked in a cell, only that it was clicked.

You could use shapes, but it would be messy.

How about something like this?

Book1.xls

Not stars but might be helpfull...

Now shg only need make vba to change cell's when they are populated

For example, third box (third cell become TRUE) need to make 1 and 2 TRUE and 4 and 5 false...

You know that VBA things

Click a star to select stars up to that point.

Column G is used to remove star rating.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("H2:L8")) Is Nothing Then
        Range("H2:L8").Rows(Target.Row - 1).Font.ColorIndex = xlAutomatic
        Range("H2:H8").Rows(Target.Row - 1).Resize(1, Target.Column - Range("H2").Column + 1).Font.ColorIndex = 6
    ElseIf Not Intersect(Range("G2:G8"), Target) Is Nothing Then
        ' No stars
        Target.Offset(0, 1).Resize(1, 5).Font.ColorIndex = xlAutomatic
    End If
    
End Sub