1. Location:
  2. / Computer learning >> Datamaskin læring >> Kontor-Programvare >> Microsoft excel >> excel Komplekset >>

Slik flytter annenhver rad til kolonne i Excel

For fleste av Excel-brukere, ved hjelp av formelen for å løse problemet i Excel er den enkleste måten.
1. Velg en celle ved siden av dine data, og skriver denne formelen = IF (ISEVEN (ROW (B2)), B2, "") plakater (B2 indikerer dataene du ønsker å komme) inn i det, og trykk Enter nøkkelen dra deretter autofyll for å fylle området du vil bruke denne formelen. Nå hver andre rad data har blitt fått i denne kolonnen.
To. Deretter velger du den andre cellen ved siden av de ovennevnte kolonnen, og skriv denne formelen = IF (ISODD (ROW (B3)), B3, "") plakater (B3 er dataene du ønsker å komme) inn i det, og trykk på Enter-tasten og dra deretter autofyll for å fylle området du vil bruke denne formelen. Nå hver tredje rad data har blitt fått i denne kolonnen.

Flytt annenhver rad i kolonne med VBA
oppfølging VBA kan også flytte annenhver rad i kolonne.
1. Trykk F11 + Alt-tastene sammen på tastaturet for å åpne Microsoft Visual Basic for Applications vinduet.
2. Deretter klikker du Sett > Modulen for å sette inn en ny modul vindu. Og deretter kopiere oppfølging VBA-kode til vinduet
VBA:.. Flytt annenhver rad i kolonne
Sub MoveRange () 'Updateby20140730ADim RNG Som RangeDim InputRng As Range, OutRng Som RangexTitleId = "KutoolsforExcel" Set InputRng = Application .SelectionSet InputRng = Application.InputBox ( "Range:", xTitleId, InputRng.Address, Type: = 8) Sett OutRng = Application.InputBox ( "Out satt til (enkelt celle):", xTitleId, Type: = 8) Set InputRng = InputRng.Columns (1) For i = 1 å InputRng.Rows.Count Trinn 2 OutRng.Resize (1, 2) .Value = Array (InputRng.Cells (i, 1) .Value, InputRng.Cells (i + 1, 1) .Value) Sett OutRng = OutRng.Offset (1, 0) NextEnd Sub


tre. Klikk Kjør-knappen eller F5-tasten på tastaturet, og en dialog spretter ut for deg å velge et område å bevege seg. Se skjermbilde:
4. Klikk deretter på OK for å vise den andre dialogboksen for å velge en celle for å sende ut resultatet. Se skjermbilde:
5. Klikk OK, og du kan se resultatet vist som nedenfor:

Flytt annenhver rad i kolonne med Kutools for Excel
Foruten formler og VBA, hvis du har installert Kutools for Excel, kan du bruke sin Transform Range funksjonen til raskt å flytte annenhver rad i kolonne.
Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. Få den nå
en. Velg området du vil flytte annenhver rad, og klikk Kutools > Range Converter > Transform Range. Se skjermbilde:
to. I dialogboksen Transform Range, sjekk én kolonne for å variere i Transform Type-delen, og sjekk Fast verdi og velg eller skriv 2 i listen i rader per post delen. Se skjermbilde:
tre. Klikk OK for å åpne en dialogboks for å velge en enkelt celle for å sette ut resultatet, se skjermbilde:
4. Klikk deretter på OK. Du kan se resultatet som vist som nedenfor:
For mer informasjon om Transform Range

Relative artikler.
  • Velg hver enda rad i Excel

    Kopier annenhver rad