Note: The other languages of the website are Google-translated. Back to English
Přihlásit se  \/ 
x
or
x
Registrace  \/ 
x

or

Jak odstranit vedoucí apostrof z čísel v aplikaci Excel?

doc odstranit vedoucí apostrof 1

Předpokládejme, že máte seznam čísel, kterým předchází skrytý apostrof, a apostrof se zobrazí pouze na liště vzorců, když vyberete buňku jako následující snímek obrazovky. A teď chcete z hodnoty buňky odstranit přední apostrof. Chcete-li je odstranit jeden po druhém, strávíte hodně času, zde budu mluvit o několika rychlých tricích pro řešení tohoto problému.

Odstraňte úvodní apostrof z čísel a vložte je jako hodnoty

Odstraňte úvodní apostrof z čísel pomocí textu na sloupec

Odstraňte přední apostrof z čísel pomocí kódu VBA

Odstraňte přední apostrof z čísel pomocí Kutools pro Excel


Můžete použít jednoduchou funkci - vložit jako hodnoty k dokončení tohoto úkolu postupujte takto:

1. Vyberte rozsah dat, ze kterého chcete odstranit úvodní apostrof, a stiskněte Ctrl + C zkopírovat je.

2. Poté klikněte na jednu buňku, kam chcete umístit výsledek, klikněte pravým tlačítkem a vyberte Hodnota 123 z Možnosti vložení, viz screenshot:

doc odstranit vedoucí apostrof 2

3. A můžete vidět, že z čísel byl odstraněn přední apostrof.

doc odstranit vedoucí apostrof 4 2 doc odstranit vedoucí apostrof 5

V aplikaci Excel Text do sloupce funkce vám také může pomoci tento úkol vyřešit.

1. Vyberte rozsah dat, ze kterého chcete odstranit úvodní apostrof.

2. Pak klikněte na tlačítko Data > Text do sloupce, a v Převést Průvodce textu na sloupce, Klepněte na tlačítko úprava tlačítko přímo, viz screenshot:

doc odstranit vedoucí apostrof 6

3. A teď najdete všechny hlavní apostrofy, které byly z čísel odstraněny.


Pokud vás zajímá kód VBA, mohu vám vytvořit kód, který vám pomůže s tímto úkolem.

1. Podržte ALT + F11 klíče v aplikaci Excel a otevře Microsoft Visual Basic pro aplikace okno.

2, klikněte Vložit > Modula vložte následující kód do Okno modulu.

Kód VBA: Odstraňte úvodní apostrof z čísel

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. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a ve vyskakovacím okně s výzvou vyberte rozsah dat, který chcete použít, viz screenshot:

doc odstranit vedoucí apostrof 7

4. A pak klikněte na tlačítko OK, byly z vybraných buněk odstraněny všechny přední apostrofy.


Kutools pro ExcelJe Převádějte mezi textem a číslem nástroj vám pomůže převést čísla formátovaná jako text na normální čísla jedním kliknutím a současně odstranit úvodní apostrof.

Kutools pro Excel : s více než 300 praktickými doplňky Excel, můžete si je vyzkoušet bez omezení do 30 dnů

Po instalaci Kutools pro Excel, postupujte následovně:

1. Vyberte rozsah dat, který chcete použít.

2, klikněte Kutools > Obsah > Převádějte mezi textem a číslem, viz screenshot:

3. V Převádějte mezi textem a číslem dialogové okno vyberte Text na číslo pod Převést typ, poté klepněte na tlačítko Ok or aplikovat tlačítko, vybraná čísla uložená jako text byla převedena na reálná čísla a přední apostrofy budou odstraněny najednou. Chcete-li jej převést zpět, stačí zkontrolovat Číslo na text in Převádějte mezi textem a číslem dialog. viz screenshoty:

doc odstranit úvodní apostrof 9 9 2 doc odstranit úvodní apostrof 10 10

Klepnutím získáte další informace o této funkci převodu mezi textem a číslem.

Stáhněte si zdarma zkušební verzi Kutools pro Excel!


Kutools pro Excel: s více než 300 praktickými doplňky aplikace Excel, můžete vyzkoušet bez omezení do 30 dnů. Stáhněte si a vyzkoušejte zdarma hned teď!

Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2019 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Kompletní funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50% a omezuje stovky kliknutí myší každý den!
officetab dno
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Andy · 5 months ago
    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.

  • To post as a guest, your comment is unpublished.
    JRob · 10 months ago
    The 2nd option worked for me with some modifications:
    1. I had to set the "Text qualifier" to the single quote
    2. I had to set the "Column data format" (on the next page) to Text
  • To post as a guest, your comment is unpublished.
    Ned · 2 years ago
    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.
  • To post as a guest, your comment is unpublished.
    Caio · 3 years ago
    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
  • To post as a guest, your comment is unpublished.
    Tom · 3 years ago
    Thanks for the tip - I used text to columns; great advice thankyou
  • To post as a guest, your comment is unpublished.
    Daniel · 3 years ago
    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.
  • To post as a guest, your comment is unpublished.
    Joseph · 4 years ago
    Thanks, text to column work for me... :-)
  • To post as a guest, your comment is unpublished.
    FDL · 5 years ago
    i LOVE THE vba CODE in theory but it didn't work :(
  • To post as a guest, your comment is unpublished.
    Cody · 5 years ago
    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.