< návrat zpět

MS Excel

Téma: Vzorec do VBA rss

Zaslal/a Martin12345678 8.12.2013 20:24

Zdravím...
Potřeboval bych do TextBoxu dostat výsledek součtu buněk, ale tak, aby byl vzorec přímo v textboxu a zároveň se průběžně zobrazoval výsledek při otevřeném UF.
Vyhledal jsem si tento kód TextBox1.Value = Sheets("List1").Range("P375").FormulaLocal = "= Suma(H3:H5)"
, ale nedaří se mi jej uplatnit. Kde dělám chybu?

Zaslat odpověď >
misocko(8.12.2013 21:08)#016713
avatar
textbox1.value = Application.WorksheetFunction.Sum(......)

nejak takto sa to myslim robicitovat
Martin12345678(8.12.2013 21:17)#016714
avatar
Tak tudy cesta nevede. Zkoušel jsem se závorkama i bez, přidat uvozovky atd., ale výsledek to nedá.
Já bych vlastně ani nepotřeboval aby se to sčítalo ve VBA, může textbox odkazovat klidně na buňku s výsledkem, ale pokud to udělám přes ControlSource tak se vzorec vždy vymaže...citovat
misocko(8.12.2013 21:32)#016715
avatar
tak to som prvykrat neprecital poriadne zadanie, s tymto Ti bohuzial nepomozem 7citovat
Martin12345678(8.12.2013 22:03)#016716
avatar
To neva, zkouším googlit, tak snad na to někde narazím...citovat
Pavlus(8.12.2013 23:04)#016717
avatar
Sice už jsem ti odpověděl, ale odepíši ještě jednou ;-), viz:
http://wall.cz/index.php?m=topic&id=16596#post-16597
P.

Viz příloha:
Příloha: zip16717_aktualizace_textboxu.zip (18kB, staženo 36x)
citovat
Martin12345678(8.12.2013 23:08)#016719
avatar
No mě se to prve nepodařilo uplatnit. Tak jsem s tím dál nechtěl otravovat a toto jsem v projektu vynechal, ale teď jsem narazil na to, že to tam fakt potřebuji. Tak jsem se to snažil vymyslet přes vzorec ve VBA. Mrknu na příklad...díkycitovat
Martin12345678(9.12.2013 5:42)#016720
avatar
Funguje perfektně.
Jak je důležitá ta část kódu na listu?
Private Sub Worksheet_Change(ByVal Target As Range)
'Userform1.TextBox1.Value = Application.Sum(Sheets("List1").Range("L24:L93"))
End Sub

Funguje mě to totiž bez toho na Office 2007, ale teď nebudu mít možnost to vyzkoušet na 2003...citovat
Pavlus(9.12.2013 11:45)#016727
avatar
Ten kód ti změní hodnotu za situace, kdy je formulář otevřen a provede se změna v listu.
Dle předchozího tématu předpokládám, že chceš mít formulář zobrazen modálně, takže je to nezbytné...
Zkus ten kód smazat, pak otevřít formulář, nechat ho otevřený, a změnit nějakou hodnotu v té oblasti součtu. Uvidíš, že to nepojede.
P.citovat
Martin12345678(12.12.2013 8:42)#016761
avatar
Měl jsi pravdu, neotestoval jsem všechny možnosti, jen první načtení výsledku a následná změna výsledku se již neaktualizovala...citovat

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