Aholkua: beste hizkuntza Google-k itzulitako dira. Bisitatu dezakezu English estekaren bertsioa.
Saioa hasi
x
or
x
x
Eman izena
x

or

Nola kalkulu-orriak kalkulu-orri anitzetan zatitu Excel-en?

Esate baterako, datuen zerrenda sorta bat daukat, gaur egun, zutabe anitzetan zatitu nahi dut errenkaden zenbaketa bidez, adibide honetan, 5 errenkada guztietan banatuko ditut (ikusi pantaila hauek). Arazo hau konpontzeko azkar laguntzeko modu bat dago? Hemen bi trikimailu jarriko dizkizute erraz egiteko.


doc-split-data-by-rows1


-2



doc-split-data-by-rows2
doc-split-data-by-rows3
doc-split-data-by-rows4
doc-split-data-by-rows5

Zatitu datuak fitxako errenkada anitzetan VBA kode batekin zenbatzea

Zutabeen datuak errenkada batzuen bidez partekatzea Kutools for Excel-rekin zenbatu zen


arrow urdina eskuineko burbuila Zatitu datuak fitxako errenkada anitzetan VBA kode batekin zenbatzea


VBA kode hau jarraian errenkadak lerro anitzetan fitxak zatitu ditzakezu errenkadak zenbatzeko, honela egin:

1. Eutsi behera ALT + F11 tekla irekitzeko Microsoft Visual Basic aplikazioak leihoa.

2. Egin klik Txertatu > Moduluak, eta ondorengo kodea itsats ezazu Moduluaren leihoan.

VBA: Split datuak orriak errenkaden arabera zenbatzen dira Excel-en.

Sub SplitData()
'Updateby20140617
Dim WorkRng As Range
Dim xRow As Range
Dim SplitRow As Integer
Dim xWs As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
SplitRow = Application.InputBox("Split Row Num", xTitleId, 5, Type:=1)
Set xWs = WorkRng.Parent
Set xRow = WorkRng.Rows(1)
Application.ScreenUpdating = False
For i = 1 To WorkRng.Rows.Count Step SplitRow
    resizeCount = SplitRow
    If (WorkRng.Rows.Count - xRow.Row + 1) < SplitRow Then resizeCount = WorkRng.Rows.Count - xRow.Row + 1
    xRow.Resize(resizeCount).Copy
    Application.Worksheets.Add after:=Application.Worksheets(Application.Worksheets.Count)
    Application.ActiveSheet.Range("A1").PasteSpecial
    Set xRow = xRow.Offset(SplitRow)
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

3. Ondoren, sakatu F5 kodea exekutatzeko tekla, eta elkarrizketa bat azalduko da zatitzeko barruti bat hautatzeko, eta egin klik OK, eta errenkada zenbatzeko zehaztutako beste elkarrizketa bat. Ikusi pantaila-argazkia:

4. Klikatu OK, eta barrutiak lerro anitzetan banatzen dira lerroen zenbaketa.

Ohar: Zatiketa-fitxak master-orriaren atzealdean kokatzen dira.


arrow urdina eskuineko burbuila Zutabeen datuak errenkada batzuen bidez partekatzea Kutools for Excel-rekin zenbatu zen

Goiko kodea datu zehatzak zatitu daitezkeen errenkaden zenbaketa zehazten du, eta ez du izenburu bat gehitu lan-orri bakoitzaren datuak zure datuak titulua badu.

Baina horrekin batera Kutools for Excel'S Zatitu datuak, kalkulu orri bakoitzaren goiburuak bakarrik txerta ditzakezu, baina zatitutako lan-orri berrien izenak ere zehaztu ditzakezu.

Kutools for Excel Excel 300 tresna erabilgarriak baino gehiago ditu. Doako 30 egunetan mugarik gabe saiatu. Lortu orain

Kutools for Excel instalatuta baduzu, egin honela:

1. Hautatu zatitu nahi duzun datu-barrutia.

2. Egin klik Enterprise > Laneko tresnak > Zatitu datuak (Edo Enterprise > Zatitu datuak ), ikusi pantaila-argazkia:

doc-split-data-by-rows6

3. In the Split Data Worksheets anitzetan elkarrizketa koadroa:

  • Aukeratu Errenkada finkoak ra Split oinarritutako Aukera, eta sartu fitxen errenkada kopurua zatitu nahi duzun lan bakoitzeko. (Zure datuek goiburuak badituzte eta zatitu berrien fitxan sartu nahi badituzu, egiaztatu Nire datuak goiburuak ditu Aukera.)
  • Ondoren zatitutako lanen izenak zehaztu ditzakezu, azpian Fitxen izen berria atala, hautatu laneko orrien izenak arauaren arabera Arauak goitibeherako zerrenda, gehitu dezakezu aurrizkia or Suffix baita orriaren izenak ere. Ikusi pantaila-argazkia:

doc-split-data-by-rows7

4. Ezarpenak zehaztu ondoren, egin klik OK, eta hautatutako datuak 5 errenkada bakoitzean liburu berri baten lan-orri anitzetan banatu dira. Eta goiburuak fitxa berri bakoitzerako txertatzen dira. Ikusi pantaila-argazkia:

doc-split-data-by-rows8

Egin klik Zatitu Datu Ezaugarri honi buruzko informazio gehiago lortzeko.

Artikulu erlazionatuak:

Nola datuak zatitu Excel-en zutabean oinarritutako hainbat lan-fitxatan?



Gomendatutako produktibitate tresnak

Bulegoko fitxa

urrezko izarra1 Lortu erabilgarriak fitxak Excelera eta beste Office softwarearentzako, Chrome bezalakoak, Firefox eta Internet Explorer berriak.

Kutools for Excel

urrezko izarra1 Harrigarria! Handitu zure produktibitatea 5 minutu barru. Ez duzu gaitasun berezirik behar, bi ordu egunero gorde!

urrezko izarra1 300 Ezaugarri berriak Excel-era, Egin Excel oso erraza eta indartsua:

  • Batu gelaxkak / errenkadak / zutabeak datuak galdu gabe.
  • Konbinatu eta finkatzea orri anitzeko lanak.
  • Compare Ranges, Copy Multiple Ranges, Convert Text to Date, Unit eta Currency Conversion.
  • Koloreak arabera, Orrialdeak guztira, Sortu aurreratua eta Super iragazkia,
  • Gehiago Hautatu / Txertatu / Ezabatu / Testua / Formatua / Esteka / Iruzkina / Lan-liburuak / Fitxen tresnak ...

Kutools-en Excel-eko pantaila-argazkia

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Max · 10 months ago
    Omg thank you so very much dude!
  • To post as a guest, your comment is unpublished.
    prasanna · 1 years ago
    Hi Thanks for this great code, but the concern is, here we can only split fixed number of rows, can you help me with split is based on some name or code, because i have different set of rows for each worksheet.
  • To post as a guest, your comment is unpublished.
    aparna · 2 years ago
    hi this works great but want the output as string how can i modify the code or i can say example : 'output',
  • To post as a guest, your comment is unpublished.
    Ralph · 2 years ago
    Thanks a lot for the fantastic VBA-Script. But how to modify it to keep the header row on every split?
  • To post as a guest, your comment is unpublished.
    Ralph · 2 years ago
    Thanks, for this fantastic VBA-Script. But how to configure it to repeat the header row on every split?