< návrat zpět

MS Excel

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

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
avatar
Cells(1, 1).Value = WorksheetFunction.CountIfs(Range("A5:A15"), "ahoj")citovat
Anonym(9.12.2021 23:53)#051669
avatar
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
avatar
Většinu

https://office.lasakovi.com/excel/vba-funkce-vzorce/WorksheetFunctions-funkce-VBA-Excel/citovat
elninoslov(10.12.2021 15:37)#051697
elninoslov
V niektorých prípadoch môžete navyše použiť na vykonanie vzorcov EVALUATE("=vzorec")citovat
Anonym(10.12.2021 15:53)#051698
avatar
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
elninoslov
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
avatar
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)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

Čas od do

lubo • 19.4. 16:30

Makro smyčka

MilanKop • 19.4. 10:46

Makro smyčka

elninoslov • 19.4. 9:02

Čas od do

elninoslov • 19.4. 8:46

Čas od do

jarek1111 • 18.4. 13:46

Čas od do

lubo • 18.4. 11:13

Čas od do

jarek1111 • 18.4. 8:32