Need expertise on assigning numeric value to text cell and copying that value to another cell.

[jyoung74]

I have an Excel file I am using as a grading rubric.

I have 5 different cells with text only in them. I need to be able to click on the cell and generate a score on the sixth cell, which is empty. For example, if I click on the first cell with text, the score is 1 and that 1 needs to appear in the sixth cell. If I click on the second cell with text, that score needs to be 2 and so on. I have no idea how to do this. Can someone guide me, please?

 

[Vidar]

Hi, and welcome to the board.
Here are two solutions. The first one is a formula. It will only work if you double click the cell and hit Enter:
=CELL("col")
The second one is a VBA solution:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column < 6 Then
        Cells(Target.Row, 6) = Target.Column
    End If
End Sub

Vidar

 

[Jeffrey Smith]

You have come to the right place. Step into my parlor. Cigar? Drink?

Welcome to the forum.

I need more info. Are you dealing with many rows of the "5 different cells"? Meaning, for example, Column A is your first cell, Column E is your fifth cell and you want to affect many rows?

I can help you.

Jeff