Getallen tot aan de : vervijderen

[GTIBert]

Ik heb een lijst met data waarvan ik gaarne de getallen tot aan de : eruit zou willen hebben.
Wie heeft er een tip?




Mvg Bert

 

[Haije]

Als het perse met een formule moet:

=RECHTS(A1;LENGTE(A1)-VIND.SPEC(":";A1)-1)

Het kan ook eenvoudig m.b.v. tekst naar kolommen

 

[AlexCEL]

Excel 365:

=TEKST.NA(A1;" ")

Overige versies:

=RECHTS(A1;LENGTE(A1)-VIND.SPEC(" ";A1))
=VERVANGEN(A1;1;VIND.SPEC(" ";A1);"")

 

[emields]

tot de dubbele punt of ook de spatie erachter?

 

[peter59]

En nog eentje met power query.

 

[popipipo]

met 'TEKST NAAR KOLOMMEN' werkt het ook.

 

[AHulpje]

Nog eentje:

=DEEL(A1;VIND.SPEC(":";A1)+2;999)

 

[snb]

Zoeken/vervangen met joker:
of VBA

Sub M_snb()
   Columns(1).Replace "* ", ""
End Sub

PS. Het lijkt wel of PQ verhindert de meest basale Excel-faciliteiten te gebruiken. Primair werk je toch met Excel ???

 

[peter59]

PS. Het lijkt wel of PQ verhindert de meest basale Excel-faciliteiten te gebruiken. Primair werk je toch met Excel ???

Dat klopt.
Maar je weet beter dan wie ook dat er legio mogelijkheden zijn om met verschillende opties binnen Excel toch in Rome te komen. Of alle mogelijkheden ook efficiënt zijn, is een andere vraag.

 

[snb]

Maar maak van een mug nooit een olifant.
Hanteer dus Ockham's scheermes.

 

[JEC.]

Maar aarzel zeker niet om PQ te gebruiken bij grotere data transformaties. Bij onderstaand draadje zijn de mug en olifant ook aanwezig.

werkbladenintegratie met SQL

In het bijgevoegde bestand voeg ik 4 werkbladen samen in 1 overzichtswerkblad. Daarvoor gebruik ik deze code: Sub M_snb() sheet1.Cells.Clear sheet2.UsedRange.Rows(1).Copy sheet1.Cells(1) For Each it In Sheets c00 = c00 & it.Name & vbLf Next With...

www.helpmij.nl

 

[emields]

Als je de code van snb wil gebruiken maak er dan dit van.

Sub M_snb()
Columns(1).Replace "*: ", ""
End Sub

anders haalt hij alles weg tot de laatste spatie.