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