Cuidiú fianáin linn ár seirbhísí a sheachadadh. Trí úsáid a bhaint ár gcuid seirbhísí, aontaíonn tú úsáid a bhainimid as fianáin.
Leid: Aistrítear Google-theangacha eile. Is féidir leat cuairt a thabhairt ar an English leagan den nasc seo.
Logáil isteach
x
or
x
x
Cláraigh
x

or

Conas sonraí a roinnt i roinnt bileoga oibre bunaithe ar cholún in Excel?

Má tá bileog oibre agat le sraitheanna ollmhóra sonraí, agus anois, ní mór duit na sonraí a roinnt i go leor bileoga oibre bunaithe ar Ainm colún (féach an scáileán seo a leanas), agus cuirtear na hainmneacha isteach go randamach. B'fhéidir gur féidir leat iad a shórtáil ar dtús, agus cóipeáil iad agus iad a ghreamú go ceann amháin i mbileoga oibre eile. Ach ní mór do foighne a chóipeáil agus a ghreamú arís agus arís eile. Sa lá atá inniu, labhair mé faoi roinnt cleasanna tapa chun an tasc seo a réiteach.

sonraí scoilt doc de réir colúin 1

Roinn sonraí i mbileoga oibre ilbhunaithe bunaithe ar cholún le cód VBA

Roinn sonraí i mbileoga oibre ilbhunaithe bunaithe ar cholún le Kutools le haghaidh Excel


Roinn sonraí i roinnt bileoga oibre bunaithe ar cholún nó sraitheanna ar leith a chomhaireamh sa bhileog oibre:

Más mian leat bileog oibre mór a roinnt i il-bhileoga bunaithe ar shonraí colún sonracha nó sraitheanna a chomhaireamh, an Kutools le haghaidh Excel's Sonraí Scoilte Is féidir le gné cabhrú leat an tasc seo a réiteach go tapa agus go héasca.

sonraí scoilt doc de réir colúin 6

Kutools le haghaidh Excel: le níos mó ná breiseán láimhe Excel 200, saor in aisce chun iarracht gan aon teorannú a dhéanamh i laethanta 60. Íoslódáil agus triail saor in aisce Anois!


Roinn sonraí i mbileoga oibre ilbhunaithe bunaithe ar cholún le cód VBA


Más mian leat na sonraí atá bunaithe ar luach na gcolún a roinnt go tapa agus go huathoibríoch, is rogha maith an cód VBA seo a leanas. Déan mar seo:

1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d'Iarratais fhuinneog.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas i bhFuinneog an Mhodúl.

Sub parse_data()
Dim lr As Long
Dim ws As Worksheet
Dim vcol, i As Integer
Dim icol As Long
Dim myarr As Variant
Dim title As String
Dim titlerow As Integer
vcol = 1        
Set ws = Sheets("Master sheet")        
lr = ws.Cells(ws.Rows.Count, vcol).End(xlUp).Row
title = "A1:C1"            
titlerow = ws.Range(title).Cells(1).Row
icol = ws.Columns.Count
ws.Cells(1, icol) = "Unique"
For i = 2 To lr
On Error Resume Next
If ws.Cells(i, vcol) <> "" And Application.WorksheetFunction.Match(ws.Cells(i, vcol), ws.Columns(icol), 0) = 0 Then
ws.Cells(ws.Rows.Count, icol).End(xlUp).Offset(1) = ws.Cells(i, vcol)
End If
Next
myarr = Application.WorksheetFunction.Transpose(ws.Columns(icol).SpecialCells(xlCellTypeConstants))
ws.Columns(icol).Clear
For i = 2 To UBound(myarr)
ws.Range(title).AutoFilter field:=vcol, Criteria1:=myarr(i) & ""
If Not Evaluate("=ISREF('" & myarr(i) & "'!A1)") Then
Sheets.Add(after:=Worksheets(Worksheets.Count)).Name = myarr(i) & ""
Else
Sheets(myarr(i) & "").Move after:=Worksheets(Worksheets.Count)
End If
ws.Range("A" & titlerow & ":A" & lr).EntireRow.Copy Sheets(myarr(i) & "").Range("A1")
Sheets(myarr(i) & "").Columns.AutoFit
Next
ws.AutoFilterMode = False
ws.Activate
End Sub

nótaí: Sa chód thuas:

  • vcol = 1 , an uimhir 1 Is é an uimhir colún gur mhaith leat na sonraí atá bunaithe ar an eolas a roinnt.
  • Socraigh ws = Bileoga ("Máistirleabhar"), Bileog Máistir Is é an t-ainm an leathanaigh gur mhaith leat an cód seo a chur i bhfeidhm.
  • title = "A1: C1" , A1: C1 Is é raon an teidil.

Tá gach ceann acu athróg, is féidir leat iad a athrú mar do ghá.

3. Ansin brúigh F5 is eochair an cód a reáchtáiltear, go bhfuil na sonraí go léir sa bhileog oibre gníomhach i roinnt bileoga oibre ag luach an cholúin. Agus ainmnítear na bileoga oibre roinnte leis na hainmneacha cille scoilte. Féach ar an scáileán:

sonraí scoilt doc de réir colúin 2

nótaí: Cuirtear na bileoga oibre roinnte i ndeireadh an leabhair oibre ina bhfuil an mháistirleabhar oibre.


Roinn sonraí i mbileoga oibre ilbhunaithe bunaithe ar cholún le Kutools le haghaidh Excel

Mar thosaitheoirí Excel, tá an cód VBA fada seo deacair dúinn, agus níl a fhios againn conas an cód a mhodhnú mar ár riachtanas.

Anseo, tabharfaidh mé uirlis ilfheidhmeach duit -Kutools le haghaidh Excel, a Sonraí Scoilte ní féidir le fóntais, ní hamháin, cabhrú leat sonraí a roinnt i ilbhileoga oibre bunaithe ar cholún, ach is féidir sonraí a roinnt freisin trí chomhaireamh sraitheanna.

Kutools le haghaidh Excel : le níos mó ná breiseán láimhe Excel 300, saor in aisce chun iarracht gan aon teorannú a dhéanamh i laethanta 60.

Má tá tú suiteáilte agat Kutools le haghaidh Excel, déan mar a leanas:

1. Roghnaigh an raon sonraí a theastaíonn uait a scoilt.

2. Cliceáil Kutools Níos mó > Bileog Oibre > Sonraí Scoilte, féach an scáileán:

sonraí scoilt doc de réir colúin 3

3. Sa an Scoilt Sonraí i Illeabhar Bileoga Oibre dialóg, is gá duit:

1). Roghnaigh Colún sonrach rogha sa Scoilt bunaithe ar agus roghnaigh an luach colún ar mhaith leat na sonraí atá bunaithe ar an liosta a scaipeadh a roinnt. (Má tá ceannteidil ag do chuid sonraí agus gur mhaith leat iad a chur isteach i ngach bileog oibre scoilte nua, seiceáil le do thoil Tá ceanntásca ag mo chuid sonraí rogha.)

2). Ansin, is féidir leat na hainmneacha bileog oibre scoilte a shonrú, faoi Ainm nua bileoga oibre alt, sonraigh na rialacha ainmneacha ar an mbileog oibre Rialacha titim síos, is féidir leat an Réimse or iarmhír do na hainmneacha bileog chomh maith.

3). Cliceáil an OK cnaipe. Féach ar an scáileán:

sonraí scoilt doc de réir colúin 4

4. Anois roinntear na sonraí i illeabharacha oibre i leabhar oibre nua.

sonraí scoilt doc de réir colúin 5

Cliceáil chun Kutools a íoslódáil le haghaidh Excel agus triail saor in aisce Anois!


Roinn sonraí i mbileoga oibre ilbhunaithe bunaithe ar cholún le Kutools le haghaidh Excel

Kutools le haghaidh Excel áirítear níos mó ná uirlisí Excel 300 handy. Saor in aisce chun iarracht gan aon teorannú a dhéanamh i laethanta 60. Íoslódáil an triail saor in aisce anois!


Airteagal gaolmhar:

Conas sonraí a roinnt i líonacha bileoga oibre ag sraitheanna?



Uirlisí Táirgiúlachta Molta

Tab Office

óir star1 Tabs tabs láimhe le Excel agus bogearraí eile Oifige, cosúil le Chrome, Firefox agus Internet Explorer nua.

Kutools le haghaidh Excel

óir star1 Iontach! Méadú do tháirgiúlacht i 5 nóiméad. Ní gá aon scileanna speisialta a bheith agat, ach dhá uair an chloig a shábháil gach lá!

óir star1 Gnéithe Nua 300 le haghaidh Excel, Déan Excel Mór Éasca agus Cumhachtach:

  • Cumaisc Cill / Sraitheanna / Colúin gan Sonraí a Chailliúint.
  • Ilchláir agus Leabhair Oibre a Chomhcheangal agus a Chomhdhlúthú.
  • Déan comparáid idir Ranganna, Cóipeáil Ilchéimeanna, Tiontaigh Téacs go dtí Dáta, Aonad agus Comhshó Airgeadra.
  • Count by Colors, Subtotals Paging, Ard-Shórtáil agus Scagaire Super,
  • Tuilleadh Roghnaigh / Ionsáigh / Scrios / Téacs / Formáid / Nasc / Comment / Leabhair Oibre / Bileoga Oibre Uirlisí ...

Lámhach scáileán de Kutools do Excel

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.
    Ellen · 3 years ago
    This is great!

    Can the same code be used to pull data from two worksheets? For example, I have a workbook with work completed and another with amount to bill. I'd like to combine the two together on a worksheet for each company with work completed on top and amount to bill below.

    Any help is greatly appreciated, thanks!
  • To post as a guest, your comment is unpublished.
    Marissa · 3 years ago
    Code works great on a small sample set of data but when I run it on my large data set (7000 rows and 53 columns) it creates the correct worksheets with no data on them. Any ideas?
  • To post as a guest, your comment is unpublished.
    Yzel · 3 years ago
    [quote name="MieMie"]The code worked like a charm for a smaller data (less than 1200 rows). I tried to use on the bigger worksheet with (17000 rows) and it just crashed after splitting into 10-12 sheets. So we tried to split the original data into 3 different workbooks and still shut us down. We have Windows 7 and our computers are not that slow either. Do you suggest any limited rows on data to use this code safely? Any suggestion would be appreciated.[/quote]



    I have same issue as above.appreciate all your help please
  • To post as a guest, your comment is unpublished.
    Prithwiraj Kundu · 3 years ago
    it s of a great help. thanks a lot for the code and example

    However I need the data to split based on other than column A( as shown in the example)it may be based on column B,C,D,... what would be the difference in coding in that case ?
    • To post as a guest, your comment is unpublished.
      Deanna · 3 years ago
      change vcol to be the number corresponding to the column, example, column B would be 2
  • To post as a guest, your comment is unpublished.
    rajesh t · 4 years ago
    Working Perfect, Need know how copy only the few columns?