Hur skapar jag lista från intervall i Excel?

Du kan behöva skapa en lista med en rad data ofta, till exempel en rad data på 24 soltermer som visas nedan. Naturligtvis kan du kopiera och klistra in dem i en lista manuellt, men det verkar lite tråkigt om det finns många kolumner i intervallet. Egentligen finns det ett par knep för att enkelt skapa en lista från angivet intervall i Microsoft Excel.

Skapa lista från intervall med VBA

Skapa lista från intervall med Kutools för Excel

Skapa lista från intervall med VBA

I Excel kan du också använda VBA-kod för att snabbt importera en lista eller ett intervall.

1. Håll ALT knappen och tryck på F11 på tangentbordet för att öppna en Microsoft Visual Basic för applikation fönster.

2. klick Insert > Modulernaoch kopiera VBA till modulen.

VBA: Skapa lista från intervall

Sub UniqueList()
'Updateby20140304
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range:", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("OutPut to (single cell):", xTitleId, Type:=8)
For i = 1 To InputRng.Rows.Count
    For j = 1 To InputRng.Columns.Count
        OutRng.Value = InputRng.Cells(i, j).Value
        Set OutRng = OutRng.Offset(1, 0)
    Next
Next
End Sub

3. klick Körning knappen eller tryck på F5 att köra VBA. En dialogruta visas på skärmen och välj det dataområde som du skapar en lista med. Se skärmdump:

5. klick OK, välj en cell för att mata ut listan från popup-dialogrutan och klicka sedan på OK. Se skärmdump:

Sedan har dataområdet skapats som en lista i den valda cellen.

Skapa lista från intervall med Kutools för Excel

Det praktiska verktyget - Kutools för Excel's Transformera intervall funktionen kan också snabbt och enkelt skapa en lista från en räckviddata.

Kutools för Excel innehåller mer än 300 praktiska Excel-verktyg. Gratis att prova utan begränsning på 30 dagar. Hämta nu

1. Välj det dataområde du vill skapa som en lista och klicka på Kutools > Mätområde > Transformera intervall. Se skärmdump:

2. I popup-fönstret Transformera intervall dialogrutan, kontrollera Område till enstaka kolumn, och klicka OK, visas en annan dialogruta där du kan välja en tom cell för att mata ut listan, klicka på OK. Se skärmdump:

3. Sedan skapas listan.

Klicka här för mer information om Transform Ranges.