Como anexar texto ao número existente no final de uma célula em uma coluna?

4

Estou tentando descobrir como anexar texto no final das células em uma coluna que tenha um número. Algumas células não têm nada, por isso não quero copiar a palavra para essas células.

Se eu tiver a coluna "B" que só tem algumas células com um número e eu quiser acrescentar a palavra "watts" atrás do número, como eu faria isso?

Euqueromanteronúmero,masadicioneapalavra"watts" no final.

    
por Dan Kelly 15.10.2012 / 13:47

3 respostas

5

Supondo que sua coluna de dados (com algumas células com números) é a Coluna B conforme declarada na pergunta, use a seguinte fórmula para suas células, digamos, Coluna C: =IF(ISNUMBER(B1),B1&"Watts","")

Esta verificação:
1. se o valor da célula é um número usando a função ISNUMBER ()
2. se sim, acrescenta "Watts" usando o operador de concatenação de strings ("&")
3. else, faz a célula em branco (se você remover o "", você obterá o valor de retorno da função IF () na célula dizendo "FALSE")

    
por 15.10.2012 / 13:51
5

Outra maneira seria usar a formatação personalizada para alterar a exibição in situ:

Selecione todo o seu intervalo de dados na coluna B, clique com o botão direito > Formatar células > Número > Personalizado

e no tipo de caixa "Tipo:"

0 "watts"

exatamente assim

Isso só altera a exibição para que você ainda possa fazer cálculos com os números (como somar a coluna ou similar) ..... e não será aplicado às células que estão em branco ou texto.

Nota: esse formato assume números inteiros conforme o exemplo mostrado, se você quiser que números decimais ou inteiros mudem para geral "watts"

    
por 15.10.2012 / 15:23
0

Passo 1: Selecione o intervalo no qual você adicionará o texto especificado;

Etapa 2: mantenha pressionadas as teclas Alt + F11 no Excel e abra o Microsoft Visual Basic para a janela Aplicativos.

Etapa 3: clique em Inserir > Módulo e cole o seguinte código VBA na Janela do Módulo.

Sub AppendToExistingOnRight()
Dim c as range
For each c in Selection
If c.value <> "" Then c.value = c.value & " watts" 
Next
End Sub

Etapa 4: pressione a tecla F5 para executar essa macro.

    
por 03.03.2016 / 06:10