Позвольте пользователю дать рейтинг звезд

Question

Интересно, может ли кто-нибудь помочь мне с star rating определенной строки в Excel, не основанный ни на каком дате номера или какой-либо информации, только на основе идеи пользователя, некоторые вещи, как и большинство веб-сайтов, используют собирать отзывы от своих клиентов. Тогда пользователь может отвести от одной до пяти звезд к написанному контенту подряд.

Answer 1

Я сделал немного пример excel-файла, который прилагается. тоже немного код.

См код ниже:

Option Explicit 

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 

прилагается файл
Here is my Excelfile

имеют хороший день