Replace Alphabet with Number

1

É possível escrever A e o Excel contar como 5, e na mesma célula que eu escrevo B e Excel contá-lo 4, até F (onde F = 0).

Na verdade, no final, quero adicionar os valores numéricos.

Por favor, note que a tela ainda deve mostrar as letras e não os números - o único número que deve ser mostrado é o total quando é somado.

    
por suleman 02.04.2014 / 09:50

3 respostas

1

Isso fará o que você quiser ou, pelo menos, você começará.

No Excel 2010, certifique-se de que a faixa de opções do desenvolvedor seja mostrada (o Google está bem documentado). Na barra do desenvolvedor, insira um botão na aba de controles

DesenheobotãonaplanilhadoExcel.Umanovajaneladeveaparecer,cliqueem"Novo".

Dentro do sub-final e final, insira o seguinte código

    dim myColumn as string
    myColumn = "A"    'UPDATE this for the column you want to use. In the picture, my content was in Column A, hence I used A

    Dim currentCell As Integer
    Dim totalValue As Integer
    Dim hasValue As Boolean
    hasValue = True
    currentCell = 0

    Do While (hasValue)

        currentCell = currentCell + 1
        If (Range(myColumn  & currentCell).Value = "") Then
            Exit Do
        End If

        Dim cellValue As String
        cellValue = UCase(Range(myColumn  & currentCell).Value) ' I assume you accept a and A (upper and lower case)

        Select Case cellValue
            Case "A"
                totalValue = totalValue + 5
            Case "B"
                totalValue = totalValue + 4
            Case "C"
                totalValue = totalValue + 3
            Case "D"
                totalValue = totalValue + 2
            Case "E"
                totalValue = totalValue + 1
            Case "F" 'we don't actually need F but it was in OP
                totalValue = totalValue + 0
        End Select

    Loop

    Range(myColumn  & currentCell).Value = totalValue

Salve o projeto como uma planilha habilitada para macro

Clique no botão e veja os resultados.

    
por 02.04.2014 / 10:34
1

Excel 2010

Vá para a guia Fórmulas e clique em "Definir nome". Uma janela pop-up será exibida. Para o nome, insira: A, para o escopo, escolha o que você gosta e para o tipo "Refere-se a:": = 5

Agora, em qualquer célula, você pode inserir o valor "= A" e obter o número 5.

Para verificar, insira o seguinte valor em qualquer célula: = A + 2. O valor da célula deve retornar 7 (5 + 2 = 7). Repita o procedimento para B, C, etc. Lembre-se de que os nomes diferenciam maiúsculas e minúsculas.

    
por 02.04.2014 / 10:05
0

Um VLOOKUP pode funcionar aqui, mas significa que você vê as letras e os números

=VLOOKUP(A1,Sheet2!$A$1:$B$6,2)

Então, na minha planilha 2, eu tenho o seguinte

enomeuworkhseet1eutenho

    
por 02.04.2014 / 10:59