legare buton excel de userform1
Last Updated: Oct 18 2010 10:04, Started by
credit
, Oct 14 2010 13:04
·
0
#1
Posted 14 October 2010 - 13:04
Am creat in vb sub excel o forma "userform1" cu 3 boxtext si un buton. La apasarea butonului se face suma.
Private Sub CommandButton1_Click() If CommandButton1 = vbcommandbutton1 Then TextBox3 = Val(TextBox1) + Val(TextBox2) End If End Sub Ei acum eu vreau sa implemenez un buton in excel care prin apasarea lui sa-mi ruleze userform-ul din vb. |
#2
Posted 15 October 2010 - 14:11
In VBA inserezi un modul nou.
In el scrii asa: Sub ArataForm UserForm1.Show End Sub In foaia de calcul inserezi un buton nou. Cand o sa apara acea caseta de dialog pentru coduri macro, selectezi codul ArataForm. Astfel ai atribuit unui buton din foaie functia de a deschide un form. Ti-am atasat si un exemplu. |
#3
Posted 18 October 2010 - 10:04
Sandstorm, on 15th October 2010, 15:11, said: In VBA inserezi un modul nou. In el scrii asa: Sub ArataForm UserForm1.Show End Sub In foaia de calcul inserezi un buton nou. Cand o sa apara acea caseta de dialog pentru coduri macro, selectezi codul ArataForm. Astfel ai atribuit unui buton din foaie functia de a deschide un form. Ti-am atasat si un exemplu. Multumesc, am verificat si functioneaza. Am reusit sa fac acelasi lucru fara a mai creea si un modul. Am creat butonul in excel cu control toolbox si am scris codul: Private Sub CommandButton1_Click() UserForm1.Show End Sub Am creeat si forma "userform1" si gata! Mersi |
Anunturi
Bun venit pe Forumul Softpedia!
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users