Você pode usar o Função InputBox em Excel VBA para solicitar que o usuário insira um valor. Coloque um botão de comando em sua planilha e adicione as seguintes linhas de código:
1. Primeiro, declare a variável myValue do tipo Variant.
Dim myValue As Variant
Observação: usamos uma variável do tipo Variant aqui porque uma variável Variant pode conter qualquer tipo de valor. Desta forma, o usuário pode inserir texto, números, etc.
2. Adicione a seguinte linha de código para mostrar a caixa de entrada.
myValue = InputBox ("Dê-me algumas informações")
3. Escreva o valor de myValue na célula A1.
Intervalo ("A1"). Valor = meuValor
Resultado quando o usuário insere o valor 5 e clica no botão OK.
4. A função InputBox tem mais argumentos opcionais. A linha de código a seguir mostra uma caixa de entrada com um título exibido na barra de título e possui um valor padrão. O valor padrão será usado se nenhuma outra entrada for fornecida.
myValue = InputBox ("Dê-me alguma entrada", "Oi", 1)
Resultado quando o usuário clica apenas no botão OK.
Nota: Coloque o cursor em InputBox no Editor do Visual Basic e clique em F1 para obter ajuda sobre os outros argumentos opcionais.