< návrat zpět

MS Excel

Téma: TextBox - počítání s hodnotami v textboxu rss

Zaslal/a OndraB 11.1.2013 6:34

Dobrý den,

prosím o pomoc, když chci počítat s hodnotami v textboxu.
Chci, aby se mi po stisknutí tlačítka sečetl TextBox1 a 2 a výsledek se zapsal do TextBoxu3.

Příklad:

Private Sub CommandButton1_Click()
TextBox3.Value = TextBox1.Value + TextBox2.Value
End Sub

Děkuji za jakoukoliv radu.

Ondra

Zaslat odpověď >
Pavlus(11.1.2013 7:25)#010958
avatar
Ahoj,
možností bude určitě více, nabízím dvě .-)...
Aktuálně ti to pracuje s řetězcem, takže jedna možnost bude využití funkce Val.
Private Sub CommandButton1_Click()
TextBox3.Value = Val(TextBox1.Value) + Val(TextBox2.Value)
End SubA nebo třeba definovat datové typy.
Private Sub CommandButton1_Click()
Dim cislo1 As Integer
Dim cislo2 As Integer
cislo1 = TextBox1.Value
cislo2 = TextBox2.Value
TextBox3.Value = cislo1 + cislo2
End SubP.citovat
OndraB(11.1.2013 8:46)#010960
avatar
Děkuji za pomoc.

Ještě mám další problém a to s vkládáním obsahu z více textboxů z formuláře do sloupců v excelu.

Příklad:
1.sloupec textboxů ve formuláři 2.sloupec textboxů ve formuláři
Adresa Jméno
Telefon Email
Rok Počet

Zápis z formuláře do excelu při kliknutí na CommandButton1_Clik následovně:
A1 A2
1řádek Adresa Jméno
2řádek Telefon Email
3řádek Rok Počet
4řádek Adresa Jméno
5řádek Telefon Email
6řádek Rok Počet
7řádek vždy zápis na první prázdný řádek pořád dokola

Pomůže prosím někdo?
Díky Ondracitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje