PREENCHIMENTO VIA FORMULARIO VBA

Question

Sub DINAMICO()

Dim LINHA As Byte, PREENCHIMENTO As String, PREENCHIMENTOTWO As Currency, PREENCHIMENTOTRES As String

Range("A1") = "PRODUTO"

Range("B1") = "VALOR"

Range("C1") = "SOBRENOME"

Range("A2") = "-"

Range("B2") = "-"

Range("C2") = "-"

LINHA = Range("A1").End(xlDown).Row + 1

PREENCHIMENTO = InputBox("NOME")

PREENCHIMENTOTWO = InputBox("VALOR")

PREENCHIMENTOTRES = InputBox("SOBRENOME")

Range("A" & LINHA) = PREENCHIMENTO

Range("B" & LINHA) = PREENCHIMENTOTWO

Range("C" & LINHA) = PREENCHIMENTOTRES

End Sub

Estou escrevendo o código acima, porém, percebi que eu necessito inserir o titulo e a primeira linha de informações da planilha de cadastro como está escrito no código em laranja. Gostaria de saber pq se eu não escrever o que esta em laranja o código da erro, no caso se eu quisesse cadastrar uma pessoa sem colocar titulo daria erro.

Answer 1

Olá , tudo bem?

Obrigada por entrar em contato com a Comunidade Microsoft.

Meu nome é Valéria sou orientadora independente e farei o possível para ajudar.

Para obter maiores esclarecimentos sobre o seu questionamento, peço a gentileza de acessar o link abaixo que vai direcioná-lo ao MSDN que é um fórum especialmente destinado para desenvolvedores e profissionais em TI para tratar está questão.

https://social.msdn.microsoft.com/Forums/pt-BR/....

Para criar uma nova pergunta no fórum MSDN, acesse:

https://social.msdn.microsoft.com/Forums/pt-BR/....

Basta logar com a sua conta Microsoft.

Espero ter ajudado, até mais!