Stel dat u een lijst met getallen heeft die worden voorafgegaan door een verborgen apostrof, en de apostrof is alleen te zien in de formulebalk wanneer u de cel selecteert zoals in de volgende schermafbeelding. En nu wilt u de leidende apostrof uit de celwaarde verwijderen. Om ze een voor een te verwijderen, zal ik veel tijd besteden, hier zal ik het hebben over enkele snelle trucs om dit probleem op te lossen.
Verwijder leidende apostrof uit getallen met plakken als waarden
Verwijder leidende apostrof uit getallen met Tekst naar kolom
Verwijder leidende apostrof uit nummers met VBA-code
Verwijder leidende apostrof uit getallen met Kutools voor Excel
U kunt een eenvoudige functie gebruiken - plak als waarden Om deze taak te voltooien, doet u het volgende:
1. Selecteer het gegevensbereik waarvan u de eerste apostrof wilt verwijderen en druk op CTRL + C om ze te kopiëren.
2. Klik vervolgens op een cel waar u het resultaat wilt plaatsen, klik met de rechtermuisknop en kies 123 waarde van de Plak opties, zie screenshot:
3. En je kunt zien dat de leidende apostrof uit de cijfers is verwijderd.
 |
 |
 |
In Excel is het Tekst naar kolom functie kan u ook helpen om deze taak op te lossen.
1. Selecteer het gegevensbereik waarvan u de leidende apostrof wilt verwijderen.
2. Dan klikken Data > Tekst naar kolom, en in de Wizard Tekst naar kolommen converteren, Klik Klaar! knop direct, zie screenshot:
3. En nu zul je zien dat alle vooraanstaande apostrofs uit de cijfers zijn verwijderd.
Als je geïnteresseerd bent in VBA-code, kan ik een code voor je maken om deze taak uit te voeren.
1. Houd de ALT + F11 toetsen in Excel, en het opent het Microsoft Visual Basic voor toepassingen venster.
2. Klikken Invoegen > moduleen plak de volgende code in het Module Venster.
VBA-code: verwijder de eerste apostrof uit cijfers
Sub remove_Apostrophe()
'Updateby20150521
Dim rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each rng In WorkRng
If Not rng.HasFormula Then
rng.Formula = rng.Value
End If
Next
End Sub
3. Druk vervolgens op F5 sleutel om deze code uit te voeren, en selecteer in het uitgeklapte promptvenster het gegevensbereik dat u wilt gebruiken, zie screenshot:
4. En klik vervolgens op OK, zijn alle vooraanstaande apostrofs verwijderd uit de geselecteerde cellen.
Kutools for Excel's Omzetten tussen tekst en nummer hulpprogramma kan u helpen om de getallen die als tekst zijn opgemaakt om te zetten naar normale getallen met één klik, en tegelijkertijd de voorloopapostrof te verwijderen.
| Kutools for Excel : met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. |
Na het installeren van Kutools for Excelgaat u als volgt te werk:
1. Selecteer het gegevensbereik dat u wilt gebruiken.
2. Klikken Kutools > Content > Omzetten tussen tekst en nummer, zie screenshot:
3. In de Omzetten tussen tekst en nummer dialoogvenster, kies Tekst naar nummer onder de Type omzetten, dan klikken Ok or Toepassen knop, zijn de geselecteerde getallen die als tekst zijn opgeslagen, geconverteerd naar reële getallen en worden de voorlopende apostrofs onmiddellijk verwijderd. Als u het terug wilt converteren, hoeft u alleen maar te controleren Nummer om te sms'en in Omzetten tussen tekst en nummer dialog.zie screenshots:
 |
|
 |
Klik om meer te weten over deze functie Converteren tussen tekst en nummer.
Download en gratis proef Kutools voor Excel nu!
