Note: The other languages of the website are Google-translated. Back to English

Conas luachanna cille a chomhtháthú go dtí má aimsítear cill bhán i gcolún?

concatenate doc go dtí go bán 1

Mar shampla, tá liosta luachanna agam lena n-áirítear roinnt cealla bána, agus anois, ba mhaith liom gach tacar sonraí idir bearnaí a chur i gcill agus na luachanna comhcheangailte i gcolún eile a liostáil mar a leanas an pictiúr a thaispeántar. Conas a d’fhéadfainn cealla a chomhchuibhiú go dtí go bhfaighidh mé cill bhán i gcolún?

Luachanna cille a chomhchuibhiú go dtí go bhfaightear cill bhán i gcolún le cód VBA

Luachanna cille a chomhchuibhiú go dtí má aimsítear cill bhán i gcolún le Kutools for Excel


mboilgeog cheart gorm saighead Luachanna cille a chomhchuibhiú go dtí go bhfaightear cill bhán i gcolún le cód VBA

Níl aon bhealach díreach ann duit tacar cealla a chur le chéile idir bearnaí, ach, is féidir leat an cód VBA seo a leanas a chur i bhfeidhm chun déileáil leis. Déan mar a leanas le do thoil:

1. Coinnigh síos an ALT + F11 eochracha a oscailt Fuinneog Microsoft Visual Basic for Applications.

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

Cód VBA: luachanna cille comhtháthaithe go dtí go bhfaightear cill bhán

Sub Concatenatecells()
'updateby Extendoffice
    Dim xRg As Range
    Dim xSaveToRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim xTStr As String
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please selecte the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Columns.Count > 1 Then
        MsgBox "the selected range is more than one column", vbInformation, "Kutools for Ecel"
        Exit Sub
    End If
    Set xSaveToRg = Application.InputBox("Please selecte output cell:", "Kutools for Excel", , , , , , 8)
    If xSaveToRg Is Nothing Then Exit Sub
    Set xSaveToRg = xSaveToRg.Cells(1)
    Application.ScreenUpdating = False
    For Each xCell In xRg
        If xCell <> "" Then
            xTStr = xTStr & xCell & " "
        Else
            xSaveToRg.Value = xTStr
            Set xSaveToRg = xSaveToRg.Offset(1)
            xTStr = ""
        End If
    Next
    If xTStr <> "" Then xSaveToRg.Value = Left(xTStr, Len(xTStr) - 1)
    Application.ScreenUpdating = True
End Sub

3. Ansin brúigh F5 eochair chun an cód seo a rith, agus tá bosca pras popped amach chun a mheabhrú duit an raon sonraí a theastaíonn uait a chomhtháthú a roghnú, féach an scáileán:

concatenate doc go dtí go bán 10

4. Ansin cliceáil OK, agus bosca pras eile popped amach, roghnaigh cill le do thoil chun an toradh comhtháthaithe a aschur, féach an scáileán:

concatenate doc go dtí go bán 11

5. Agus ansin cliceáil OK cnaipe, agus tá sonraí liosta na gcolún comhtháthaithe idir na bearnaí, féach an scáileán:

concatenate doc go dtí go bán 1


mboilgeog cheart gorm saighead Luachanna cille a chomhchuibhiú go dtí má aimsítear cill bhán i gcolún le Kutools for Excel

Má tá tú Kutools le haghaidh Excel, ag comhcheangal a Raon Trasfhoirmigh agus Chomhcheangail gnéithe, is féidir leat an post seo a chríochnú chomh luath agus is féidir. Tá an Raon Trasfhoirmigh is féidir le fóntais cabhrú leat an colún aonair a thiontú go raon, agus an Chomhcheangail is féidir le gné cabhrú leat an raon athraithe a chomhchruinniú go colún.

Kutools le haghaidh Excel : le níos mó ná 300 breiseán áisiúil Excel, saor in aisce le triail gan aon teorannú i 30 lá. 

Tar éis a shuiteáil Kutools le haghaidh Excel, déan mar a leanas le do thoil:

1. Roghnaigh na cealla is mian leat a thabhairt le chéile, agus cliceáil Kutools > Raon > Raon Trasfhoirmigh, féach ar an scáileán:

2. Sa an Raon Trasfhoirmigh bosca dialóige, seiceáil Colún aonair le raon rogha faoin Cineál a athrú, Agus ansin roghnaigh Teoraíonn cill bán taifid faoi ​​na Sraitheanna in aghaidh an taifead, féach ar an scáileán:

concatenate doc go dtí go bán 3

3. Ansin cliceáil Ok, agus tiocfaidh bosca pras amach le cur i gcuimhne duit cill a roghnú chun an toradh a aschur, féach an scáileán:

concatenate doc go dtí go bán 4

4. Cliceáil OK, agus tá na sonraí colún aonair tiontaithe ina sraitheanna agus ina gcolúin iolracha ag an gcill bhán, féach an scáileán:

concatenate doc go dtí go bán 5

5. Tá na sonraí tiontaithe i gcolúin iolracha, mar sin ní mór duit iad a chomhcheangal in aon cholún amháin, roghnaigh an raon sonraí agus cliceáil le do thoil Kutools > Cumaisc & Scoilt > Comhcheangail Sraitheanna, Colúin nó Cealla gan Sonraí a chailleadh, féach ar an scáileán:

6. Sa an Comhcheangail Colúin nó Sraitheanna bosca dialóige, déan na roghanna seo a leanas:

(1.) Roghnaigh Comhcheangail colúin rogha ón Cealla roghnaithe a chur le chéile de réir na roghanna seo a leanas;

(2.) Ansin sonraigh deighilteoir gur mhaith leat na luachanna comhtháthaithe a dheighilt;

(3.) Roghnaigh an chaoi ar mhaith leat déileáil leis na cealla comhcheangailte. Féadfaidh tú na sonraí bunaidh a choinneáil nó a scriosadh, agus féadfaidh tú na cealla comhcheangailte a chumasc. Féach an pictiúr:

concatenate doc go dtí go bán 7

7. Tar éis na socruithe a chríochnú, cliceáil Ok or Cuir iarratas isteach cnaipe, tá na cealla comhtháthaithe i gcolún amháin le deighilteoir ar leith, féach an scáileán:

concatenate doc go dtí go bán 8

Íoslódáil agus triail saor in aisce Kutools le haghaidh Excel Now!


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíonn Office / Excel 2007-2021 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d'fhiontar nó d'eagraíocht. Gnéithe iomlána triail saor in aisce 30-lá. Ráthaíocht airgid ar ais 60-lá.
cluaisín kte 201905

Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
bun officetab
Sórtáil tuairimí de réir
Comments (7)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Conas a dhéanfá é más mian leat é a bhunú ó cholún eile? Tá sonraí cosúla agam, ach is uimhir é colún B ansin nótaí (cosúil le do thorthaí) i gcolún I, ba mhaith liom na nótaí go léir i gcolún I a chomhcheangal go dtí go bhfuil cill eile i gColún B nach bhfuil ach uimhir aici. Uaireanta bíonn litir faoi B ​​nó bíonn na cealla bána agus sin an fáth gur gá í a chur le chéile go dtí uimhir. Ansin, ar deireadh, an féidir é a aschur ar ais go dtí an áit a thosaigh sé an chéile? IE tá gach nóta don chéad uimhir i gcolún j, ach má tá an chéad uimhir eile 5 shraith thíos go breá, téann sé i gcolún j ach an uimhir ró céanna agus a aimsítear an uimhir?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Léiríonn sé go bhfuil earráid chomhréire ar líne 3 "Dim xRg As Range" nuair atáim ag iarraidh an modúl seo a rith bunaithe ar mhodh 1, cad ba cheart dom a dhéanamh faoi?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, JJ, Oibríonn an cód go maith i mo bhileog oibre, cén leagan Excel a úsáideann tú? Nó is féidir leat screesnhot de d'fhadhb a chur isteach anseo.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
post iontach bro, An-úsáideach
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit,
Tá failte romhat. Sásta cabhraíonn sé. Aon cheist, bíodh leisce ort teagmháil a dhéanamh linn. Bíodh lá maith agat.
Le meas,
Mandy
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh! Tar éis na luachanna a athrú (mar shampla, watermelon in ionad úll) cén fáth nach bhfuil an fhoirmle ag obair?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Cristina

Soláthraíonn ár n-alt cód VBA, ní sholáthraíonn sé foirmle. Má athraíonn tú an t-ábhar cille, ní mór duit an cód a athreáchtáil arís chun an toradh ceart a fháil.
Go raibh maith agat!
Níl aon tráchtanna curtha suas anseo go fóill
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta

Lean orainn

Cóipcheart © 2009 - www.extendoffice.com. | Gach ceart ar cosaint. Cumhachtaithe ag ExtendOffice. | léarscáil an tSuímh
Is trádmharcanna nó trádmharcanna cláraithe de chuid Microsoft Corporation sna Stáit Aontaithe agus / nó i dtíortha eile iad lógó Office agus Office.
Cosanta ag Sectigo SSL