Pomoc oko f-je COUNT!

[ toci @ 06.11.2013. 22:41 ] @

Imam odredjenu listu u kojoj ima artikle koji su u jednoj celiji podeljeni sa "/" (npr. Jagoda/Breskva). Kada na kraju dana zelim da prebrojim koliko sam ceka prodao, i ako u celiji "Jagoda/Breskva" imam 5/8, postoji li sansa da mi Excel ovo izbroji kao 13 (5+8)?

Unapred hvala!

[ ib.kroki @ 07.11.2013. 08:01 ] @

Ako sam te dobro shvatio COUNT ti neće pomoći.
Najbolje okači primer, tako ćeš najbrže doći do rešenja.

[ Jpeca @ 07.11.2013. 08:38 ] @

Iz ovako škrte informacije rekao bih da je najlakše da razdvojiš sadržaj kolone koja sadrži 5/8 u pomoćne kolone pomoću alata Text to Columns, pa nakon toga sabiraš/prebrojvaš te pomoćne kolone.

[ FOX028 @ 07.11.2013. 09:23 ] @

Nesto sam uspeo da odradim ali pomocu VBA koda a na radnom listu ga pozivas kao i svaku drugu funkciju, u prilogu ti je primer.

[ Jpeca @ 07.11.2013. 11:30 ] @

Fox je u svom kodu koristio funkciju Evaluate koja je deo Excel Macro 4.0. Ova funkcija osim što je dostupna iz VBA može da se koristi i preko dijaloga za imenovanje ćelija http://www.ozgrid.com/News/excel-evaluate-formula-VBA.htm

Znači interesantno, mada ne i efikasno rešenje bez makroa bilo bi
1/U nekoj pomoćnoj koloni izvrši substitute "/" sa "+". Neka su tako dobijeni podaci od B1:B10.

2/ Otvori se dijalog Define Name. U nazivu (Name:) upiše EVAL a u refernci (Refers to:)
= EVALUATE($B1)
3/ U prvoj ćeliji nove kolone u kojoj će biti rezultati, se upiše =EVAL u toj ćeliji i formula kopira za ostatak

[ toci @ 08.11.2013. 21:53 ] @

Citat:

FOX028:
Nesto sam uspeo da odradim ali pomocu VBA koda a na radnom listu ga pozivas kao i svaku drugu funkciju, u prilogu ti je primer.

Izvinite, nisam bio tu juce, tako da nisam odgovarao! Ovaj VBA kod je bas to sto mi treba! Radi savrseno....

[ toci @ 08.11.2013. 21:55 ] @

Citat:

Jpeca:
Fox je u svom kodu koristio funkciju Evaluate koja je deo Excel Macro 4.0. Ova funkcija osim što je dostupna iz VBA može da se koristi i preko dijaloga za imenovanje ćelija http://www.ozgrid.com/News/excel-evaluate-formula-VBA.htm

Znači interesantno, mada ne i efikasno rešenje bez makroa bilo bi
1/U nekoj pomoćnoj koloni izvrši substitute "/" sa "+". Neka su tako dobijeni podaci od B1:B10.

2/ Otvori se dijalog Define Name. U nazivu (Name:) upiše EVAL a u refernci (Refers to:)
= EVALUATE($B1)
3/ U prvoj ćeliji nove kolone u kojoj će biti rezultati, se upiše =EVAL u toj ćeliji i formula kopira za ostatak

Kada ovo isprobam sutra, posto je sada kasno, napisacu utiske!

Hvala puno na pomoci!

*** Jpeca*** Ako moze pomoc, okacio sam primer, jer ja ne mogu nikako da se snadjem sa ovim sto si mi napisao! Hvala!

_{[Ovu poruku je menjao toci dana 09.11.2013. u 10:58 GMT+1]}

[ toci @ 09.11.2013. 19:55 ] @

Nesto mi ne idu od ruke instrukcije koje mi je dao Jpeca, pa ako moze jos malo pomoci. Okacio sam primer!

[ Ivek33 @ 10.11.2013. 00:21 ] @

Citat:

toci: Nesto mi ne idu od ruke instrukcije koje mi je dao Jpeca, pa ako moze jos malo pomoci. Okacio sam primer!

Ovaj primjer se razlikuje od prvobitnog tvog pitanja iz kojega se nije moglo znati kako točno izgledaju tvoji podaci na kojima radiš

Vjerojatno bi netko dao drugačiji način, no evo ti primjer nazad rješen sa VBA (naravno ako ti odgovara)

Code:
Function MyEval(s)
MyEval = Evaluate(s)
End Function

i formulom u pomoćnim stupcima
Upotrijebljena je funkcija SUBSTITUTE koja konvertira znak "/" u znak "+0" u kombinaciji sa myeval koji je vezan za VBA.
S obzirom da se pojavljuje znak "+" ispred ili iza nekog broja postavljen je argument "+0"

U prvom koraku funkcija SUBSTITUTE

Code:
=SUBSTITUTE(B1;"/";"+0")

vraća rezultat više vrijednosti pa tako

Code:

1/1 => 1+01
2/1 => 2+01
1/ => 1+0
/5 => +05

Formula

Code:
=myeval("="&SUBSTITUTE(B1;"/";"+0"))

izbacuje znak "+" i "0" a ujedno zbraja dva broja
Problem kod ove formule je što za praznu ćeliju vraća error #VALUE pa da bi to izbjegli sve je ugniježđeno u IF funkciju

Code:
=IF(SUBSTITUTE(B1;"/";"+0")="";"";myeval("="&SUBSTITUTE(B1;"/";"+0")))

Sorry ako sam negdje pogriješio u brzini jer je već kasno. Netko će već ispraviti me. (vidi attach)
btw: vjerojatno ima još načina
pozz

[ toci @ 10.11.2013. 18:10 ] @

*** Ivek 33***

Ovo je sasvim dovoljno i lepo objasnjeno! Hvala svima za pomoc!