For eksempel, jeg har en rekkevidde (A1: A11) som inneholder tall med etterfølgende negative tegn. Jeg kan bruke følgende formler for å løse dem ved å fjerne de negative tegn fra venstre til høyre 4. I trinn 3, klikker du på Avansert ... knappen og en avansert tekst Import Settings dialogboks vil komme fram; vennligst sjekk Trailing minus for negative tall og klikk OK. Se skjermbilde:
1. = IF (HØYRE (A1,1) =. "-", Erstatte (A1, "-", " ") * - 1, A1)
to. = VERDI (IF (HØYRE (A1,1) = "-", HØYRE (A1,1) & VENSTRE (A1, LEN (A1 -1)), A1))
Velg en blank celle ved siden av cellen som du vil endre. Jeg vil klikke B1 og en inngang av de ovennevnte formler i cellen. Deretter trykker du på Enter-tasten, og den etterfølgende negative tegnet vil bli fjernet fra høyre til venstre. Og deretter drar fyllhåndtaket over området av celler som du ønsker å fikse traling negative tegn. Se skjermbilde:
Fix følgende negative tegn i celler med Tekst til kolonner fungere
Også vi kan bruke Tekst til kolonner for å fikse etterfølgende negative tegn med følgende fremgangsmåte:
1. Velg området du ønsker å fikse etterfølgende negative tegn.
To. Gå til båndet, klikker du Data > Tekst til kolonner, og en Konverter tekst til kolonner Wizard dialogboksen vises. Se skjermbilde:
tre. Klikk på Neste-knappen i trinn 1 og trinn 2.
5. Klikk på Fullfør. Og alle de etterfølgende negative skiltene vil bli fikset
Fix følgende negative tegn i celler med VBA-kode
Vi kan også bruke en VBA-kode for å fikse etterfølgende negative tegn i celler, kan du gjøre som følger:.
1. Markere området du ønsker å fikse etterfølgende negative tegn, deretter Klikk Developer > Visual Basic, en ny Microsoft Visual Basic for Applications-vinduet vises, klikker du Sett > Modul og deretter inn følgende VBA-kode:
VBA. Fikse alle etterfølgende negative tegn i et valgt område
Sub FixNegative () 'Updateby20131113Dim rng Som RangeDim WorkRng Som RangeOn Error Resume NextxTitleId = "KutoolsforExcel" Set WorkRng = Application .SelectionSet WorkRng = Application.InputBox ("Range", xTitleId, WorkRng.Address, Type: = 8) Sett WorkRng = WorkRng.SpecialCells (xlCellTypeConstants, xlTextValues) for hver rng I WorkRng xVerdi = rng.Value Hvis VBA.Right (xVerdi 1) = "-" Så rng.Value = "-" & VBA.Left (xVerdi, VBA.Len (xVerdi) - 1) End IfNextEnd SUB2. Klikk knappen for å kjøre koden, og deretter en dialogboks vises for deg å velge et område du ønsker å fikse den etterfølgende negative, se skjermbilde:
tre. Klikk Ok, så alle etterfølgende negative valuse er festet til normale negative verdier.
Raskt fikse følgende negative tegn i celler med Kutools fo Excel
Vi kan raskt fikse følgende negative tegn med Kutools for Excel Change Sign of Verdier
Kutools for Excel. med mer enn 120 praktiske Excel-tillegg, gratis å prøve uten begrensning i 30 dager. Få den nå
Hvis du har installert Kutools for Excel, kan du fikse følgende negative tegn som følger
Trinn 1. Velg området du ønsker å endre positive tall til negative tall, og klikk Kutools >.; Innhold Converter > Endre Sign of verdier. Se skjermbilde:
Trinn 2. Kontroller Fix følgende negative tegn i popup dialog, og klikk OK eller Bruk. Se skjermbilde:
Kutools for Excel Change Sign of Verdier kan også endre alle positive verdier til negative verdier, endre alle negative verdier til positive og så videre. For mer detaljert informasjon om Endre Sign of verdier, kan du gå Endre Sign of Verdier har beskrivelse.
Datamaskin læring 