Gå til hovedindhold

Sådan fjernes førende apostrof fra tal i Excel?

doc fjern førende apostrof 1

Antag at du har en liste over tal, der er forud for en skjult apostrof, og apostrofen ses kun i formellinjen, når du vælger cellen som følgende skærmbillede. Og nu vil du fjerne den førende apostrof fra celleværdien. At fjerne dem en efter en vil bruge meget tid, her vil jeg tale om nogle hurtige tricks til at løse dette problem.

Fjern ledende apostrof fra tal med indsæt som værdier

Fjern ledende apostrof fra tal med tekst til kolonne

Fjern førende apostrof fra tal med VBA-kode

Fjern førende apostrof fra tal med Kutools til Excel


Du kan bruge en simpel funktion - indsæt som værdier Gør følgende for at afslutte denne opgave:

1. Vælg det dataområde, som du vil fjerne den førende apostrof, og tryk på Ctrl + C at kopiere dem.

2. Klik derefter på en celle, hvor du vil placere resultatet, og højreklik, og vælg derefter 123 værdi fra Indsæt indstillinger, se skærmbillede:

doc fjern førende apostrof 2

3. Og du kan se, at den førende apostrof er fjernet fra tallene.

doc fjern førende apostrof 4 2 doc fjern førende apostrof 5

I Excel er Tekst til kolonne funktion kan også hjælpe dig med at løse denne opgave.

1. Vælg det dataområde, som du vil fjerne den førende apostrof.

2. Klik derefter på data > Tekst til kolonne, og i Konverter tekst til kolonne guidenklik Finish knap direkte, se skærmbillede:

doc fjern førende apostrof 6

3. Og nu vil du finde alle de førende apostrofer er blevet fjernet fra tallene.


Hvis du er interesseret i VBA-kode, kan jeg oprette en kode til dig til at håndtere denne opgave.

1. Hold nede ALT + F11 nøgler i Excel, og det åbner Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.

VBA-kode: Fjern ledende apostrof fra tal

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. Tryk derefter på F5 nøgle til at køre denne kode, og vælg det dataområde, du vil bruge, i det pop op-meddelelsesfelt, se skærmbillede:

doc fjern førende apostrof 7

4. Og klik derefter på OK, er alle de førende apostrofer fjernet fra de valgte celler.


Kutools til Excel's Konverter mellem tekst og tal hjælpeprogram kan hjælpe dig med at konvertere tallene formateret som tekst til normale tal med et enkelt klik og fjerne den førende apostrof på samme tid.

Kutools til Excel : med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage

Efter installation Kutools til Excelskal du gøre som følger:

1. Vælg det dataområde, du vil bruge.

2. Klik Kutools > Indhold > Konverter mellem tekst og tal, se skærmbillede:

3. I Konverter mellem tekst og tal dialogboksen, vælg Tekst til nummer under Konverter type, og klik derefter på Ok or Indløs knappen, er de valgte numre, der er gemt som tekst, konverteret til reelle tal, og de førende apostrofer fjernes med det samme. Hvis du vil konvertere det tilbage, skal du kun kontrollere det Nummer til tekst in Konverter mellem tekst og tal dialog. se skærmbilleder:

dok fjern den førende apostrof 9 9 2 dok fjern den førende apostrof 10 10

Klik for at vide mere om denne konvertering mellem tekst og nummerfunktion.

Download og gratis prøveversion Kutools til Excel nu!


Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu!

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
Comments (9)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
didn't work for me. I acutally needed to save a .txt, and find/replace with notepad++. mine were not showing up as a ', but a ?. not at all visible in Excel. thought I would share my experience in case it helps someone else.
This comment was minimized by the moderator on the site
The 2nd option worked for me with some modifications: 1. I had to set the "Text qualifier" to the single quote2. I had to set the "Column data format" (on the next page) to Text
This comment was minimized by the moderator on the site
This is terrific! Thank you so much for providing a simple way to remove a leading apostrophe from a column. It was driving me crazy. Thanks again for all your help.
This comment was minimized by the moderator on the site
Public Sub REMOVE_APOSTROPHE()

Dim R_CELL As Range
Dim TEMP_VALUE As Variant

For Each R_CELL In Selection

TEMP_VALUE = R_CELL.Value
R_CELL.Clear
R_CELL.Value = TEMP_VALUE

Next R_CELL

End Sub
This comment was minimized by the moderator on the site
Thanks for the tip - I used text to columns; great advice thankyou
This comment was minimized by the moderator on the site
When the first two tricks do not work (this was in my case), I found another simple trick. This trick only works when all cells have the same number of characters behind an annoying ' that cannot be removed for whatever reason. 1-insert column next to cells with ' 2- enter into the new column formula "right" referring to cells with ' and insert no. characters after '. 3- Copy cells with formula-result and paste as values in the original column. 4- remove added column with formula.
This comment was minimized by the moderator on the site
Thanks, text to column work for me... :-)
This comment was minimized by the moderator on the site
i LOVE THE vba CODE in theory but it didn't work :(
This comment was minimized by the moderator on the site
Do you have any suggestions (preferably VBA) for removing apostrophes after numbers in excel? I have an excel file that takes data from an AutoCAD file and many of the values have one or two apostrophes (denoting feet or inches) but unfortunately this makes it unable to run equations on these cells. I know it is possible using "text to cells" but I was hoping using VBA would be possible.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations