Kako enostavno in hitro prenašati podatke o obsegu in skladiščenju v Excelu?
Na primer, nekaj podatkov je prikazanih v skupinah, zdaj pa želim prenesti obseg in zložiti podatke v vsak stolpec, kot je prikazano spodaj. V tem članku bom predstavil metode te naloge v Excelu.
Prenesite in zložite podatke z VBA
Prenesite in zložite podatke z dimenzijo Transpose Table Dimension
Prenesite in zložite podatke z VBA
Za prenos in skladanje podatkov lahko uporabite kodo VBA.
1. Izberite podatke, razen naslovov stolpcev, in pritisnite Alt + F11 tipke za omogočanje Microsoft Visual Basic za aplikacije okno.
2. klik Vstavi > Moduliin prilepite spodnjo kodo v Moduli.
VBA: Prenos in skladanje podatkov
Sub ConvertTableToList()
'UpdatebyExtendoffice20161121
Const TEST_COLUMN As String = "A"
Dim i As Long, j As Long
Dim iLastRow As Long
Dim iLastCol As Long
Application.ScreenUpdating = False
With ActiveSheet
iLastRow = .Cells(.Rows.Count, TEST_COLUMN).End(xlUp).Row
For i = iLastRow To 2 Step -1
iLastCol = .Cells(i, .Columns.Count).End(xlToLeft).Column
For j = iLastCol To 3 Step -1
.Rows(i + 1).Insert
.Cells(i + 1, 2).Value = .Cells(i, j).Value
.Cells(i, j).Value = ""
Next j
Next i
.Rows(1).Delete
End With
Application.ScreenUpdating = True
End Sub
3. Pritisnite F5 ključ, nato pa so bili podatki preneseni in zloženi. Oglejte si posnetek zaslona:
Opomba: V kodi VBA A pomeni, da podatke za prenos prenesete v stolpec A aktivnega lista in zamenjate prvotne podatke v stolpcu A.
Prenesite in zložite podatke z dimenzijo Transpose Table Dimension
Če želite hitro in enostavno prenesti podatke o obsegu in skladih brez kode VBA, se lahko prijavite Kutools za ExcelJe Prenesi dimenzijo tabele uporabnost.
Po namestitvi Kutools za Excel, naredite spodaj :(Brezplačno prenesite Kutools za Excel zdaj!)
1. Izberite podatke, ki jih uporabljate, kliknite Kutools > Območje > Prenesi dimenzije tabele. Oglejte si posnetek zaslona:
2. V pogovornem oknu potrdite Navzkrižna tabela za seznam in izberite celico, v katero želite umestiti prenesene podatke Razpon rezultatov (ena celica) besedilno polje. Oglejte si posnetek zaslona:
3. klik Ok. Zdaj je obseg prenesen in zložen v stolpce.
Prenos podatkov o obsegu in skladih
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!