Boa noite!!

Você realmente espera o efeito do click, com formulas, isso é possível usando VBA, pode ser?

Att

Olá
Sim exemplo se eu tiver na célula o numero 5 insira 5 linhas caso mude o n° para 4 insira 4 linhas .
Se não tem como fazer com formulas, pode ser no VBA.
VC pode me passar como faço para fazer essa configuração no VBA.

Bom dia!!

Considerando que os dados estão em A1,B1,D1 o cabeçalho.
CLIENTE QTDADE DATA DA COMPRA QTDADE
JOSE 3 25/01/2015 1

Sub AleVBA_14659()
'Copia uma célula da coluna A, a quantidade de vezes que estiver em B2
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "AleVBA"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Selecione a célula :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Onde deseja Colar:", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
    For Each Rng In InputRng.Rows
        xValue = Rng.Range("A1").Value
        xNum = Rng.Range("B1").Value
        OutRng.Resize(xNum, 1).Value = xValue
        Set OutRng = OutRng.Offset(xNum, 0)
    Next
End Sub

faça os testes!!

Att

Olá não tenho habilidades com VBA de fazer configuração vc pode me passar o caminho de como faço para colocar está formula tentei aqui mas não deu certo.

Boa tarde!!

Sabe habilitar as macros?

Veja o anexo

Após executar a macro (na guia Plan2), a 1º opção é para seleciona a célula A2, a 2º opção selecione A3, como em B2 tem o valor 3, o nome será repetido 3 vezes!!

Att

Agora consegui obrigado.

Boa tarde!

Se a dica foi útil, click na mãozinha!!

Att