Spaties verwijderen

[mattie94]

Hoi,

Ik download een factuur, daarin zitten allemaal telefoonnummers.
Doormiddel van verticaal zoeken wil ik bij het telefoonnummer de juiste naam.

Maar voordat ik kan beginnen met verticaal zoeken moet ik zorgen dat de opmaak van de telefoonnummers gelijk is.
de opmaak die de telefoonummers bevat die ik van de factuur importeer is als volgt:
06(spatie)22(spatie(123)spatie(456) oftwel: 06 22 123 456
Of verticaal te kunnen zoeken, moeten de spaties weg zijn.
de functie =SPATIES.WISSEN(A2) werkt niet.

Bij voorkeur wil ik gebruik maken van een VBA code, heb op internet verschillende gevonden, maar die werkte helaas niet.
Wie kan me helpen.

ALvast bedankt!

 

[Cobbe]

Deze zal wel lukken:

=SUBSTITUEREN(A1;" ";)

+ de VBA-code:

Sub cobbe()
For Each C In Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row)
  C.Replace What:=" ", Replacement:=""
Next
End Sub

 

[mattie94]

Waar moet ik deze code dan neerzetten?

 

[Cobbe]

Je vroeg toch een VBA-code ipv een formule? Terwijl die formule ook perfect werkt.