Jak odstranit / odstranit všechny mezery za posledním znakem v aplikaci Excel?
Co byste udělali pro odstranění všech mezer za posledním znakem (koncové mezery) z buněk? Tento článek vám ukáže dvě metody, jak se s tím vypořádat.
Odstraňte všechny mezery za posledním znakem pomocí kódu VBA
Pomocí Kutools pro Excel snadno odstraníte všechny mezery za posledním znakem
Odstraňte všechny mezery za posledním znakem pomocí kódu VBA
Následující kód VBA vám pomůže odstranit všechny mezery za posledním znakem z buněk.
1. Vyberte buňky, které potřebujete k odstranění všech mezer za posledním znakem, a stiskněte Další + F11 současně otevřete Microsoft Visual Basic pro aplikace okno.
2. V Microsoft Visual Basic pro aplikace okno, klikněte prosím Vložit > Modul. Poté zkopírujte a vložte následující kód VBA do okna modulu.
Kód VBA: Odstraňte všechny mezery za posledním znakem
Sub NoSpaces()
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In xRg
xCell.Value = RTrim(xCell.Value)
Next
Application.ScreenUpdating = True
End Sub3. zmáčkni F5 klíč ke spuštění kódu, pak a Kutools pro Excel Zobrazí se dialogové okno, vyberte rozsah, který potřebujete k odstranění všech mezer za posledním znakem, a poté klikněte na OK .
Nyní jsou všechny mezery za posledním znakem vybraných buněk okamžitě odstraněny.
Pomocí Kutools pro Excel snadno odstraníte všechny mezery za posledním znakem
V této části vám doporučíme Odebrat mezery užitečnost Kutools pro Excel. Pomocí tohoto nástroje můžete odstranit nejen koncové mezery, ale jakýkoli druh mezer, jako jsou přední nebo nadbytečné mezery, pouze kliknutím, jak potřebujete.
Před aplikací Kutools pro Excel, Prosím nejprve si jej stáhněte a nainstalujte.
1. Vyberte rozsah buněk, které potřebujete k odstranění všech mezer za posledním znakem. Poté klikněte Kutools > Text > Odebrat mezery. Viz snímek obrazovky:
2. V Odebrat mezery V dialogovém okně vyberte Koncové mezery možnost a poté klikněte na OK knoflík. Viz screenshot:
Poté jsou všechny mezery za posledním znakem vybraných buněk odstraněny najednou.
Poznámka: Pokud chcete odstranit všechny úvodní mezery nebo jiné mezery podle potřeby, vyberte odpovídající možnost v dialogovém okně Odebrat mezery a použijte funkci.
Pokud chcete mít bezplatnou (30denní) zkušební verzi tohoto nástroje, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
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 snižuje stovky kliknutí myší každý den!
