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

Hoe vervang ik een teken in een woord zonder ctrl F

  • Onderwerp starter Onderwerp starter HWV
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.

HWV

Terugkerende gebruiker
Lid geworden
19 feb 2009
Berichten
1.213
Beste,

ik heb in mijn sheet PAA in kolom 2, verschillende getallen staan met
Code:

ervoor zoals
Code:
 3346340
Nu wil ik deze vervangen door niks, maar mijn code werkt niet.
Ik heb al geprobeerd via zoeken en vervangen maar hij herken dan niet

Code:
Sub regelsweg()
  With Sheets("PAA").Columns(2)
    .Replace "", ""
  End With
End Sub

Alvast bedankt voor de genomen moeite

HWV
 
Beste,

ik heb in mijn sheet PAA in kolom 2, verschillende getallen staan met
Code:

ervoor zoals
Code:
 3346340
Nu wil ik deze vervangen door niks, maar mijn code werkt niet.
Ik heb al geprobeerd via zoeken en vervangen maar hij herken dan niet

Code:
Sub regelsweg()
  With Sheets("PAA").Columns(2)
    .Replace "", ""
  End With
End Sub

Alvast bedankt voor de genomen moeite

HWV


Je gaat best de ascii waarde van dat vreemde teken uitlezen. Ik vermoed dat dat 12 is, maar ben niet zeker. Kan je een vb. bestand met dat teken in even bijvoegen om het te checken?
 
Bijlage

Beste,

In de bijlage vind je en een aantal voorbeelden van mijn probleem.

groet HWV
 

Bijlagen

Gebruik dan deze code eens:

Code:
.Replace Chr(12), ""
 
Gelukt

Bedankt voor de input.
Ik kreeg jou optie Finch niet voor elkaar, ik heb het nu met deze optie gedaan:

Code:
With Columns(2)
     .NumberFormat = "@"
     .Replace "", ""
  End With

Groet HWV
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan