Este fórum está sendo desativado

[RafaelVasconcelos]

Amigos, bom dia!
Gostaria de pedir-lhes uma ajuda no problema abaixo:
Planilha de cadastro de clientes.
Gostaria de criar uma macro para que quando o texto (nome do cliente) for digitado, coluna 3, linha 1, este seja copiado para a coluna 6, linhas 1, 2 e 3. Ou seja cada cliente que for cadastrado na coluna 3, a macro gera 3 vezes o mesmo nome coluna 6, nas 3 linhas sequenciais, um nome na mesma linha em que foi digitado e mais duas vezes o mesmo nome nas linhas abaixo, e assim sucessivamente, conforme exemplo anexo.

Desde já muito obrigado pela grande ajuda.

[osvaldomp]

Instale o código abaixo no módulo da planilha de interesse.

Código: Selecionar todos

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Column <> 3 Then Exit Sub
 Target.Offset(, 3).Resize(3) = Target.Value
End Sub