Excel Formulário para preenchimento em abas diferentes

[LucasExcel]

Bom dia, 

 

Eu não consigo criar um formulário que a cada caixa de texto seja incluído o texto em uma aba diferente e em uma célula diferente, segue o print para melhor explicação. Observacao a caixa de texto valor1,valor2 e valor3 entrará valor numérico e caixa de texto "nome" e "tbn"  entrara um valor de texto.

 

Obs: Arquivo em anexo. 

 

 

Obs

Pasta2.zip

[Midori]

@LucasExcel No botão atribua os valores dos Text a essas células, p.ex

 

Private Sub CommandButton1_Click()
    Sheets("Dash").[X4] = TextBox1
    Sheets("Dash").[X5] = TextBox2
    Sheets("Tabela dinamica - Volume").[I2] = TextBox3
End Sub

 

[LucasExcel]

@Midori o código atende bem, porém quando eu insiro valor numérico, por exemplo "1000,00" o arquivo vai em texto eu gostaria que se fosse possível ir em número, seria bom, e se fosse possível que os valores que eu escrevi nas caixas de texto fosse inseridos apenas quando eu apertar o botão "Cadastrar".

 

[Midori]

@LucasExcel Para converter em número use a função Val no TextBox,

 

Sheets("Tabela dinamica - Volume").[I2] = Val(TextBox3)

 

[LucasExcel]

Tem alguma forma de ser inserido na célula apenas quando eu apertar no botão "cadastrar"?

[Midori]

@LucasExcel Sim, é só colocar na sub do botão no evento Click.

 

Na planilha anexada só tem um botão no formulário, o CommandButton1.

 

No primeiro código que eu postei os valores são inseridos quando o botão é pressionado.

 

[LaerteB]

Boa tarde, LucasExcel

 

O nosso amigo Midori já informou isso no post #2, observe que o:

Private Sub CommandButton1_Click()

é o botão "Cadastro" do seu arquivo exemplo.

 

Quando clicar o botão "Cadastro" será executado os comandos que solicitou.

 

Aguardando sua resposta e seu Feed Back ... se foi útil, não esqueça de clicar na "mãozinha"

 

LaerteB

[LucasExcel]

@Midori muito obrigado, atendeu perfeitamente. Eu que estava utilizando de forma errada anteriormente.