MS Excel

Téma: Cells(1, 1).Value = Application.Evaluate COUNTIF

Zaslal/a PavDD 8.12.2021 13:03

Dobrý den
Chsi spočítat všechny výskyty "ahoj" v daném sloupci
Když mám v bunce vzorec : =COUNTIFS(R[1]C:R[13]C;""ahoj"")
nebo jinak napsano, v jiné bunce =COUNTIFS( A5:A15 ; ""ahoj"")"
bunka vrátí výsledek v pořádku /součet výskutů "ahoj".

Potřebuju ale ten výsledek nějak přečíst makrem abych ji pak mohl třeba hodit do proměnné , nebo jinam doplnit do bunky.

Zkouším toto ale nejede to.
Poradíte prosím?
Cells(1, 1).Value = Application.Evaluate COUNTIFS(R[1]C:R[" & r & "]C;""ahoj"")
nebo
Cells(1, 1).Value = Application.Evaluate COUNTIFS( A5:A15 ; ""ahoj"")"
Debug.Print Cells(1, 1).Value 'kontrola ?
range(B10).value = ...výsledek toho vzorce... ???

Zaslat odpověď >

Anonym(8.12.2021 23:06)#051654

Cells(1, 1).Value = WorksheetFunction.CountIfs(Range("A5:A15"), "ahoj")citovat

Anonym(9.12.2021 23:53)#051669

Ahoj, SUPER. tzn, že ten mustr WorksheetFunction. řekne VBA aby zpracoval jakoukoliv funkci co mu napíšu ze vzorce bunky ?citovat

Anonym(10.12.2021 13:50)#051694

Většinu

https://office.lasakovi.com/excel/vba-funkce-vzorce/WorksheetFunctions-funkce-VBA-Excel/citovat

elninoslov(10.12.2021 15:37)#051697

V niektorých prípadoch môžete navyše použiť na vykonanie vzorcov EVALUATE("=vzorec")citovat

Anonym(10.12.2021 15:53)#051698

Ok, to už mi někdo psal, ale možná jsem to do VBA napsal nějak blbě, nefungovalo mi to.
tzn třeba :
range("A5")= EVALUATE("=vzorec") ?
nebo např:
Dimm hodnota
hodnota = EVALUATE("=vzorec") ?

Děkuju, Vyzkoušímcitovat

elninoslov(10.12.2021 16:00)#051699

Ano, len pozor, vzorec musí byť EN aj s EN oddeľovačmi. Teda nie CZ.
Preklad napr. tu.citovat

PavDD(10.12.2021 16:12)#051701

Aha, tak v tom byl ten problém,díky za upřesnění, já z toho už šílel. Vzpomínáte , jak jste mi pomohl s tím odeslání emailu a doplněním příznaku Odesláno... Pokouším se to dál rozvětvit. viz forum načíst email podle předmětu a zpracovat, neměl by jste na to , resp. na mě "nervy". Díky.Pavcitovat

Uživatelské menu

Nejste přihlášen(a)

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.