• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Excel 2010 formule niet bekend,

Status
Niet open voor verdere reacties.

pesmaeli

Gebruiker
Lid geworden
12 dec 2006
Berichten
26
Ik gebruik Excel 2010, en voor het splitsen van een naam, tussenvoegsels en achternaam in een cel wil ik de volgende formules gebruiken,
=voornaam(A1)
=TussenLinks(A1)
=NaamRechts(A1) .

Maar helaas zie ik deze formules in Excel 2010 niet, heeft er iemand enig idee hoe dat komt, en hoe ik die formules in kan zetten? Er zijn wel allerlei lange formules, maar die drie vind ik de makkelijkste.
groet
Parviz
 
Parviz,

dat zijn geen standaardformules van Excel.
Als je in een vorige versie van Excel wel deze formules tot je beschikking had, dan zijn het UDF's (User Defined Functions)
 
Goedendag Haije,

Dank voor je antwoord, je zei over User Defined Functions, kan ik die functies zelf in Excel als een vaste formules invoeren vaker gebruiken?
groet
Parviz
 
Hierbij een poging.
Code:
Function NaamSplits(Naam As String, NaamDeel As String) As String
    Dim Br
    Dim i As Long
    Dim sT As String
    
    Br = Split(Naam)
    Select Case NaamDeel
        Case "Voornaam"
            sT = NaamSplits(Naam, "Tussenvoegsel")
            NaamSplits = IIf(sT = "", Br(0), Trim(Left(Naam, InStr(Naam, sT) - 1)))
        Case "Tussenvoegsel"
            If UBound(Br) = 1 Then Exit Function
            For i = 1 To UBound(Br)
                If Not IsError(Application.Match(Br(i), Array("de", "van", "der", "te", "el", "het", "'t", "den"), 0)) Then _
                    NaamSplits = NaamSplits & Br(i) & " "
            Next
            If InStr(Naam, NaamSplits) = 0 Then NaamSplits = Split(NaamSplits)(0) & " "
        Case "Achternaam"
            sT = NaamSplits(Naam, "Tussenvoegsel")
            NaamSplits = IIf(sT = "", Right(Naam, Len(Naam) - InStr(Naam, " ")), Mid(Naam, InStr(Naam, sT) + Len(sT)))
    End Select
End Function
 

Bijlagen

Laatst bewerkt:
Formule splitsen naam, tussenvoegsel en achternaam user defind

het werkt perfect, dank.
groet
:d
 
Hoi ,

Ik zoek dus ook zoiets maar dan voornaam en tussenvoegels bij elkaar houden en alleen de achternaam apart.
Hoe moet die code dan aangepast worden??

alvast bedankt.
Rob
 
@rob91

Beter een nieuwe vraag openen.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan