Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

getal in tekst zoeken

1,422 views
Skip to first unread message

Verschaeren@discussions.microsoft.com Yves Verschaeren

unread,
Nov 23, 2009, 2:54:17 AM11/23/09
to
Ik krijg een bestand toe, met straat, nummer en busnummer in één cel. Soms
is het huisnummer voorafgegaan door bvb. een komma en zou scheiden makkelijk
zijn. Soms ook niet. vb. Generaal De Witte laan 15 bus 1. Ik zou dus kunnen
zoeken op welke positie er een getal staat (vind), maar hoe doe ik dat? Kan
excel zoeken naar een willekeurig getal in één cel die zowel tekst als
getallen bevat? Hoe?

j van c

unread,
Nov 23, 2009, 5:30:20 AM11/23/09
to

"Yves Verschaeren" <Yves Versc...@discussions.microsoft.com> schreef in
bericht news:C46688B3-9088-4876...@microsoft.com...
> Ik krijg een bestand toe, met straat, nummer en busnummer in ��n cel.
> Soms
> is het huisnummer voorafgegaan door bvb. een komma en zou scheiden
> makkelijk
> zijn. Soms ook niet. vb. Generaal De Witte laan 15 bus 1. Ik zou dus
> kunnen
> zoeken op welke positie er een getal staat (vind), maar hoe doe ik dat?
> Kan
> excel zoeken naar een willekeurig getal in ��n cel die zowel tekst als
> getallen bevat? Hoe?
plaats de volgende code in een module en roep de functie c_u_t (cijfer uit
tekst) in een cel aan met

=c_u_t(A1)

Public Function c_u_t(str As String) As Long

Dim i As Integer


For i = 1 To Len(str)
If IsNumeric(Mid(str, i, 1)) Then

c_u_t = c_u_t * 10 + Mid(str, i, 1)

End If

Next i

End Function


Wigi

unread,
Nov 23, 2009, 2:38:02 PM11/23/09
to
Of:

{=MIN(ALS(ISGETAL(WAARDE(DEEL(A1;RIJ(INDIRECT("1:" &
LENGTE(A1)));1)));RIJ(INDIRECT("1:" & LENGTE(A1)));""))}

Als matrixformule ingeven (dus Ctrl-Shift-Enter ipv. Enter)

--
<a
href="http://users.skynet.be/fa436118/wim/opdrachten.htm">http:/www.wimgielis.be</a>: Excel (VBA code + example files), sports and music.


"j van c" wrote:

>
> "Yves Verschaeren" <Yves Versc...@discussions.microsoft.com> schreef in
> bericht news:C46688B3-9088-4876...@microsoft.com...

> > Ik krijg een bestand toe, met straat, nummer en busnummer in één cel.

> > Soms
> > is het huisnummer voorafgegaan door bvb. een komma en zou scheiden
> > makkelijk
> > zijn. Soms ook niet. vb. Generaal De Witte laan 15 bus 1. Ik zou dus
> > kunnen
> > zoeken op welke positie er een getal staat (vind), maar hoe doe ik dat?
> > Kan

> > excel zoeken naar een willekeurig getal in één cel die zowel tekst als


> > getallen bevat? Hoe?
> plaats de volgende code in een module en roep de functie c_u_t (cijfer uit
> tekst) in een cel aan met
>
> =c_u_t(A1)
>
> Public Function c_u_t(str As String) As Long
>
> Dim i As Integer
>
>
> For i = 1 To Len(str)
> If IsNumeric(Mid(str, i, 1)) Then
>
> c_u_t = c_u_t * 10 + Mid(str, i, 1)
>
> End If
>
> Next i
>
> End Function
>
>

> .
>

0 new messages