• 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.

basis URL verwijderen uit cel

Status
Niet open voor verdere reacties.

supervinnie40

Gebruiker
Lid geworden
28 apr 2016
Berichten
28
Beste leden,

Ik heb in een Xcel sheet een veld waar een link geplakt wordt, hier wordt vervolgens gekeken of de link begint met http of https, en dan wordt de basis van de URL eraf gehaald eraf gehaald. Ik wil hiermee bereiken dat de waarde die in deze cel wordt getypt of geplakt, wordt gekopieerd naar een andere cel zonder hetgene dat voor de eerste "/" komt.

http://www.voorbeeld.nl/testerdetest of https://www.voorbeeld.nl/testerdetest
wordt dan
/testerdetest

Dit werkt redelijk met: =ALS(ISGETAL(VIND.SPEC("https";B3));SUBSTITUEREN(B3;"https://www.voorbeeld.nl";"");SUBSTITUEREN(B3;"http://www.voorbeeld.nl";""))
Maar http://www.voorbeeld.com wordt hierbij niet veranderd.

Ik zou deze functie graag willen uitbreiden om hetzelfde te doen wanneer het om voorbeeld.BE gaat. Indien mogelijk, dan zou het ook prima zijn als het alles kan vervangen dat voor de "/" komt.
Ik heb alleen geen flauw idee hoe ik dit moet doen....
 
UDF

Code:
Function F_snb(c00)
  F_snb=split(c00,"/")(ubound(split(c00,"/")))
Edn Function
 
Met formule:
Code:
=ALS.FOUT(RECHTS(B3;LENGTE(B3)-VIND.SPEC("/";SUBSTITUEREN(B3;"//";""))-1);"")
 
UDF

Code:
Function F_snb(c00)
  F_snb=split(c00,"/")(ubound(split(c00,"/")))
Edn Function
Bedankt, maar ik heb nog geen ervaring met Macro's, dus ik weet niet goed hoe dat werkt.
Met formule:
Code:
=ALS.FOUT(RECHTS(B3;LENGTE(B3)-VIND.SPEC("/";SUBSTITUEREN(B3;"//";""))-1);"")
Ik ga dit eens uitproberen. Bedankt.

**Edit, bedankt voor je oplossing AlexCEL. Er is alleen 1 klein probleem. Als je www.voorbeeld.com/blabla/blabla intypt, dan krijg je "labla/blabla".
Mijn oude oplossing was ook niet beter, want die haalde het begin niet eens weg in dit geval. Maar is het misschien mogelijk om rekening te houden met een URL die begint met www. in plaats van http://www. ??
 
Laatst bewerkt:
Of:

=SUBSTITUEREN(SUBSTITUEREN(A2;"http://";"");"https://";"")
 
Probeer deze ook eens:
Code:
=RECHTS(A1;LENGTE(A1)-VIND.ALLES("~";SUBSTITUEREN(A1;"/";"~";LENGTE(A1)-LENGTE(SUBSTITUEREN(A1;"/";"")))))
 
Of:

=SUBSTITUEREN(SUBSTITUEREN(A2;"http://";"");"https://";"")
Bedankt, maar dit haalt alleen http:// of https:// weg. Het doet niets met www.voorbeeld.nl wat er achteraan komt.
Probeer deze ook eens:
Code:
=RECHTS(A1;LENGTE(A1)-VIND.ALLES("~";SUBSTITUEREN(A1;"/";"~";LENGTE(A1)-LENGTE(SUBSTITUEREN(A1;"/";"")))))
Als ik de URL van deze pagina pak (van dit Helpmij topic), dan krijg ik 899573-basis-URL-verwijderen-uit-cel?p=5820191#post5820191. Terwijl ik eigenlijk /forum/showthread.php/899573-basis-URL-verwijderen-uit-cel?p=5820191 wil hebben.
 
Inderdaad; tja.

Voor de laatste wijziging dan maar.
Code:
=DEEL(A1;VIND.SPEC("#";SUBSTITUEREN(A1;"/";"#";3));LENGTE(A1))
 
op basis van jou laatste voorbeeld komen de dubbele slash ("//") altijd voor. en de eerstvolgende slash is na de url, pecies op het punt waar je wilt starten
dan zou het met deze formule moeten werken

Code:
=DEEL(A1;VIND.SPEC("/";A1;VIND.SPEC("//";A1)+2);LENGTE(A1))

mocht het nu ook voorkomen dat soms http ontbreekt kun je de formule nog aanvullen met een als fout

Code:
=ALS.FOUT(DEEL(A5;VIND.SPEC("/";A5;VIND.SPEC("//";A5)+2);LENGTE(A5));DEEL(A5;VIND.SPEC("/";A5);LENGTE(A5)))
 
Laatst bewerkt:
op basis van jou laatste voorbeeld komen de dubbele slash ("//") altijd voor. en de eerstvolgende slash is na de url, pecies op het punt waar je wilt starten
dan zou het met deze formule moeten werken

Code:
=DEEL(A1;VIND.SPEC("/";A1;VIND.SPEC("//";A1)+2);LENGTE(A1))

mocht het nu ook voorkomen dat soms http ontbreekt kun je de formule nog aanvullen met een als fout

Code:
=ALS.FOUT(DEEL(A5;VIND.SPEC("/";A5;VIND.SPEC("//";A5)+2);LENGTE(A5));DEEL(A5;VIND.SPEC("/";A5);LENGTE(A5)))

That's it :D :D Ik was bang dat ik iets teveel wou van 1 formule, maar ik heb het geprobeerd met enkele voorbeelden en het werkt perfect. Dank je!

En ook bedankt aan HSV, AlexCEL, jkpieterse en snb voor het meezoeken naar een oplossing.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan