Helpmij.nl
Helpmij.nl
Helpmij.nl

Quote

Weergeven resultaten 1 tot 6 van 6

Onderwerp: Van tekst naar getal

  1. #1
    Member
    Geregistreerd
    15 december 2008
    Vraag is opgelost

    Van tekst naar getal

    IK krijg in een kolom tekst met een "spatie"
    Met "Substitueren" lukt het niet
    Kolom A Kolom B
    4 09,85 4 09,85 Formule in "B1"=SUBSTITUEREN(A1;" ";"")

    Met vba lukt het ook niet
    Code:
    For Each Val In Sheets("TekstNaarGetal").Columns(1).SpecialCells(2)
        Val = Replace(Val, " ", "", 1, 1)
    Next
    Zie ook bijlage
    Dank bij voorbaat, Jos
    Bijgevoegde bestanden Bijgevoegde bestanden

  2. #2
    Giga Honourable Senior Member
    Geregistreerd
    2 maart 2013
    Er staat geen spatie (char(32)) maar een ander teken

    Code:
    =SUBSTITUTE(A1;CHAR(160);"")
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  3. #3
    Tera Honourable Senior Member edmoor's avatar
    Geregistreerd
    9 september 2000
    Locatie
    Zuid-Holland
    Ook wel een non-breaking space genoemd.
    Zie kolom I:
    TekstNaarGetal.xlsm
    Laatst aangepast door edmoor : 15 oktober 2021 om 16:02
    "It's hardware that makes a machine fast. It's software that makes a fast machine slow. "
    Op rechtstreekse vragen via email of privébericht reageer ik niet. Daar is het forum voor.
    Lees ook: http://www.helpmij.nl/forum/announcement.php?f=5

  4. #4
    Member
    Geregistreerd
    15 december 2008
    Beste VenA en edmoor,
    Bedankt het werkt: op het werkblad met Teken(160) in vba met Chr(160).
    Hoe kan ik weten dat er geen "spatie" staat maar wel een ander karakter.

  5. #5
    Tera Honourable Senior Member edmoor's avatar
    Geregistreerd
    9 september 2000
    Locatie
    Zuid-Holland
    Als het vervangen van een spatie niet werkt weet je dat het geen spatie is

    Doe dan zoiets:
    Code:
    Sub a()
        For i = 1 To Len([A1])
            Debug.Print "[" & Mid([A1], i, 1) & "] - " & Asc(Mid([A1], i, 1))
        Next i
    End Sub
    Het wordt dan getoond in het Direct venster.
    Resultaat:
    Klik op afbeelding voor grotere versie

Naam:  Resultaat.png
Bekeken: 14
Grootte:  3,7 KB
    Een spatie is 32.
    Laatst aangepast door edmoor : 15 oktober 2021 om 17:22
    "It's hardware that makes a machine fast. It's software that makes a fast machine slow. "
    Op rechtstreekse vragen via email of privébericht reageer ik niet. Daar is het forum voor.
    Lees ook: http://www.helpmij.nl/forum/announcement.php?f=5

  6. #6
    Giga Honourable Senior Member
    Geregistreerd
    2 maart 2013
    Als het vervangen van een spatie niet werkt weet je dat het geen spatie is
    dat dacht ik nu ook.
    simpele analyse zonder VBA
    Code:
    =CODE(MID(A1;2;1))
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

Berichtenregels

  • U mag geen nieuwe vragen starten.
  • U mag niet reageren op berichten.
  • U mag geen bijlagen versturen.
  • U mag uw berichten niet bewerken.
  •  
Helpmij.nl
Helpmij.nl

Helpmij.nl

Regels
Help

Helpmij.nl en business

Partners
Sponsoren