Jump to content

Calcular com valores de Combobox


tfnd

Recommended Posts

Boas

Um problema complexo para o meu nivel de conhecimento

Fotografia do formulário e folha de excel para ajudar a compreensão

Eu introduzo valores na caixa de texto 252, 253 , 255, 256 and 267 e elas retornam valores na folha4.range(a2:e2) depois click no commandbutton8 e tenho uma macro que armazena os valores na folha5.$a:$e

1- como configuro a textbox 253,255,256 e 257 para ter valores de moeda

2- como fazer para que os valores dessas textbox que estão a ser mostrados sejam apagados apos carregar no commandbutton8 apos terem sido armazenados na folha5

Private Sub TextBox252_Change()

   Folha4.Range("a2").Value = TextBox252

End Sub

Private Sub TextBox253_Change()

Folha4.Range("b2").Value = TextBox253

End Sub

Private Sub TextBox255_Change()

Folha4.Range("c2").Value = TextBox255

End Sub

Private Sub TextBox256_Change()

Folha4.Range("d2").Value = TextBox256

End Sub

Private Sub TextBox257_Change()

Folha4.Range("e2").Value = TextBox257

End Sub

Private Sub TextBox258_Change()

Folha5.Range("h2").Value = TextBox258

End Sub

Private Sub CommandButton8_Click()

Call grava

End Sub

3- a Combobox1 está a mostrar os valores armazenados na folha5 quando clico em commandbutton8 mas apenas os últimos valores antes de carregar o formulário, como fazer para ele mostrar os valores recentemente inseridos quando clico no button8
4- Quando clico commandbutton9 queria que agarra-se nos valores que selecionei na combobox1 e os ponha na folha5.range(h2:L2) que retorna os valores na textbox262, 261 , 260, 259
 

Private Sub ComboBox1_Change()

End Sub

Private Sub CommandButton9_Click()

Me.TextBox262.Text = Folha5.Range("i3").Text

Me.TextBox260.Text = Folha5.Range("j3").Text

Me.TextBox261.Text = Folha5.Range("k3").Text

Me.TextBox259.Text = Folha5.Range("l3").Text

End Sub

Outra questão, é possivel por o formulário a maximizar ou a fazer scroll? como? visto que em monitores com menos resolução não aparece todo?

 

Obrigado antecipadamente

desculpem a newbice

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.