Excel 2010: Adicione texto a cada célula de uma coluna

Question

Como posso adicionar @gmail.com ou algo semelhante a uma coluna de nomes de usuários sem ter que digitar isso em cada célula? Eu estou usando o Excel 2010. Eu tenho uma lista de centenas de nomes de usuários que precisam ter @gmail.com ou algo semelhante adicionado para criar um arquivo csv para upload.

    

Answer 1

Supondo que seus nomes estejam na coluna a partir de A1, você pode usar a fórmula:

=A1&"@gmail.com"

    

Answer 2

Se você precisar alterar o valor das células, recomendamos Solução da Hand-E-Food . (Se você precisar mantê-lo em uma coluna, basta Copiar e Colar valores especiais > de volta na coluna original.)

No entanto, se você quiser simplesmente exibir o sufixo sem realmente alterar os valores das células, você pode usar um formato numérico personalizado. No Excel 2007 ou posterior, selecione Personalizar em Início > Número. Nas versões anteriores, é o formato > Células > Número. Use @"@gmail.com" como o formato personalizado.

Nesta captura de tela, a coluna A está usando um formato personalizado, como eu descrevo. A coluna B está usando a solução de Hand (você pode ver a fórmula no centro à direita).

    

Answer 3

Digamos que seus nomes de usuários estejam na coluna A a partir de A1. Vá para B1, insira a seguinte fórmula e arraste-a para baixo até o final da linha em que a lista termina (ou você pode simplesmente clicar duas vezes no canto inferior direito da célula).

=CONCATENATE(A1,"@gmail.com")

    

Answer 4

Uma maneira muito fácil com o notepad ++: Se você precisar fazer modificações em uma coluna, então:

1. copie e cole sua colum excel no notepad ++
2. pressione alt + as setas.
3. o que você vai escrever será adicionar em todas as linhas

Answer 5

Se você quiser adicionar diretamente o texto especificado em cada célula de uma seleção, a macro VBA a seguir facilitará seu trabalho.

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

Passo 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 & "@gmail.com" 
Next
End Sub

Passo 4: Pressione a tecla F5 para executar esta macro.