banjalukaforum.com
https://www.banjalukaforum.com/

Access pitanje
https://www.banjalukaforum.com/viewtopic.php?f=18&t=64878
Stranica 1 od 1

Autoru:  Archangel [ 02 Jul 2014, 18:31 ]
Tema posta:  Access pitanje

Naime, nasao sam na netu kod za udf koja prebrojava ponavljanje zadatog karaktera u okviru izabranog range-a (npr u nizu 110101, da prebroji koliko ima nula, i ispise 2).

Kod izgleda ovako:

Kod:
Option Explicit
Function COUNTTEXT(ref_value As Range, ref_string As String) As Long

Dim i As Integer, count As Integer

count = 0

For i = 1 To Len(ref_value.Value)
    If Mid(ref_value, i, 1) = ref_string Then count = count + 1
Next

COUNTTEXT = count

End Function


Kod perfektno radi u Excelu... Medjutim, kada isti ubacim u Access, i pozovem ga preko expression u querry-ju:

Nule: COUNTTEXT([polje1],0)

Izbacuje mi #error... Ne kontam u cemu je fazon posto ne koristim Access bas toliko... Ako neko zna u cemu je problem, ili mozda zna drugi nacin da odradim ovaj posao...

Autoru:  Archangel [ 18 Jul 2014, 01:33 ]
Tema posta:  Re: Access pitanje

Rjesio... i to veoma jednostavno :)

len (polje) - len (replace(polje,0,''))

Krajnje elegantno rjesenje :D

Stranica 1 od 1 Sva vremena su u UTC [ DST ]
Powered by phpBB® Forum Software © phpBB Group
http://www.phpbb.com/