Alguem sabe uma macro do excel que ira automaticamente copiar e colar uma celulas selecionadas em outra coluna?

Por exemplo deixa-o que eu tinha a colunas - G com cada um tendo suas próprias entradas.

A B C D E F G
Linha 1 3 4 5 R D
Linha 2 9 7 6 E B

Quando eu seleciono 3 eu quero que ele automaticamente copie e cole esse valor (3) na coluna F (linha 1) e se eu selecionar 4 eu quero que ele automaticamente copiar e colar 4 na coluna G (linha 1). Então se eu clicar em 9 eu quero que ele automaticamente copiar e colar 9 na coluna F (linha 2) e se eu selecionar E, eu quero que ele automaticamente copiar e colar e na coluna G (linha 2). Qualquer ajuda seria muito apreciada.

Obrigado!

Resposta

Estou assumindo que você queira inserir qualquer um dos 5 valores em cada linha para colunas F & G, quando você seleciona uma célula em colunas A:E. se assim, o manipulador de eventos a seguir vai fazer como você deseja.

Copie o seguinte manipulador de eventos para a área de transferência.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim aCol, aRow

aRow = ActiveCell

aCol = ActiveCell.Column

Se ActiveCell.Column< 6="" then="">

Se intervalo ("F" & aRow).Valor = "", em seguida,

Intervalo ("F" & aRow).Valor = ActiveCell.Value

ElseIf Range("G" & aRow).Valor = "", em seguida,

Intervalo ("G" & aRow).Valor = ActiveCell.Value

End If

End If

EndSub

Selecione a planilha que contém os dados e clique com o botão direito na guia da planilha.

Selecione 'Exibir código'.

Cole o manipulador de eventos em branco editando a área à direita.

Feche o VBE.

Selecione as células para retornar os valores nas colunas F:G.