Notifications
Clear all

Carregar textbox

3 Posts
1 Usuários
0 Reactions
911 Visualizações
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Eu de novo!!!!!

Preciso de mais uma ajuda , tenho um form (FrmCad) com varios textbox; onde digito valores que ao clicar no botão "Gravar" , são transferidos à planilha RESUMO.

Porém preciso que ao carregar o FrmCad os textbox sejam carreagados com os valores atuais da RESUMO ,

O Cod que uso é:
Private Sub Gravar_Click()
Range("C9").Value = TextBox13.Value
Range("D9").Value = TextBox14.Value
Range("E9").Value = TextBox15.Value
Range("C10").Value = TextBox16.Value
Range("D10").Value = TextBox17.Value
Range("E10").Value = TextBox18.Value
Range("G5").Value = TextBox19.Value
Range("H5").Value = TextBox20.Value
Range("I5").Value = TextBox21.Value
Range("G6").Value = TextBox22.Value
Range("H6").Value = TextBox23.Value
Range("I6").Value = TextBox24.Value
end sub

Preciso que ao carregar o FrmCad os textbox acima busquem na planilha RESUMO os valores atuais e sejam preenchidos com os mesmos , que poderão ser alterados com o codigo acima.
Ah , mais uma coisa ; o textbox 15 e 16 serão preenchidos por data DD/MM/AAAA como validar para só aceitar datas validas?

 
Postado : 25/04/2012 9:03 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia!!

Tente assim e faça sua adadtação.

Private Sub CommandButton1_Click()
 Me.TextBox1.Text = Range("A1").Value
 Me.TextBox2.Text = Range("A2").Value
End Sub
 
Postado : 26/04/2012 5:09 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Muito obrigado alexandre , matou a pau , aos poucos e com paciencia estou aprendendo.

 
Postado : 26/04/2012 9:46 am