Hoppa till huvudinnehåll

Hur tar jag bort / tar bort alla mellanslag efter det sista tecknet i Excel?

För att radera alla mellanslag efter det sista tecknet (efterföljande mellanslag) från celler, vad skulle du göra? Den här artikeln visar två metoder för att hantera det.

Ta bort alla mellanslag efter det sista tecknet med VBA-kod
Ta enkelt bort alla mellanslag efter det sista tecknet med Kutools för Excel


Ta bort alla mellanslag efter det sista tecknet med VBA-kod

Följande VBA-kod kan hjälpa dig att ta bort alla mellanslag efter det sista tecknet från celler.

1. Markera cellerna du behöver för att ta bort alla mellanslag efter det sista tecknet och tryck sedan på andra + F11 samtidigt för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer klicka på fönstret Insert > Modulerna. Kopiera och klistra sedan in följande VBA-kod i modulfönstret.

VBA-kod: Ta bort alla mellanslag efter det sista tecknet

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 Sub

3. tryck på F5 nyckel för att köra koden, sedan a Kutools för Excel dialogrutan dyker upp, välj det intervall du behöver för att ta bort alla mellanslag efter det sista tecknet och klicka sedan på OK knapp.

Nu tas alla mellanslag efter det sista tecknet i valda celler bort direkt.


Ta enkelt bort alla mellanslag efter det sista tecknet med Kutools för Excel

I det här avsnittet rekommenderar vi dig Ta bort utrymmen nytta av Kutools för Excel. Med det här verktyget kan du ta bort inte bara de efterföljande utrymmena, utan alla typer av utrymmen som ledande eller överskott av utrymmen med bara klick som du behöver.

Innan du ansöker Kutools för ExcelBer ladda ner och installera det först.

1. Välj det cellområde som du behöver för att ta bort alla mellanslag efter det sista tecknet. Klicka sedan Kutools > text > Ta bort utrymmen. Se skärmdump:

2. I Ta bort utrymmen Välj dialogrutan Efterföljande utrymmen och klicka sedan på OK knapp. Se skärmdump:

Sedan tas alla mellanslag efter det sista tecknet i valda celler bort på en gång.

Anmärkningar: Om du vill ta bort alla ledande utrymmen eller andra utrymmen som du behöver, välj motsvarande alternativ i dialogrutan Ta bort utrymmen och använd funktionen.

  Om du vill ha en gratis provperiod (30 dagar) av det här verktyget, klicka för att ladda ner den, och gå sedan till för att tillämpa operationen enligt ovanstående steg.

Bästa kontorsproduktivitetsverktyg

Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50 + Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

kte-flik 201905


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations