Kuidas ühendada lahtrid Excelis vertikaalselt ilma andmeid kaotamata

Hugh West

16-10-2023 Exceli põhitõed
  • Jaga Seda
Hugh West

Üks kõige tähtsamaid ja laialdaselt kasutatavaid ülesandeid, mida me Excelis töötades peame täitma, on lahtrite vertikaalne ühendamine ilma andmeid kaotamata. Täna näitan teile, kuidas saate Excelis lahtreid vertikaalselt ühendada ilma andmeid kaotamata.

Lae alla praktiline töövihik

Rakkude ühendamine vertikaalselt ilma andmeid kaotamata.xlsm

4 lihtsat meetodit Exceli lahtrite vertikaalseks ühendamiseks ilma andmeid kaotamata

Siin on meil andmekogum, mis sisaldab mõnede autorite nimesid ja nende raamatuid raamatupoes nimega Martin Bookstore.

Meie tänane eesmärk on ühendada sama autori raamatute nimed vertikaalselt ühte lahtrisse ilma andmeid kaotamata.

1. Käivitage Exceli tööriistaribal olev ühendamise ja keskendamise tööriist, et ühendada lahtrid Excelis vertikaalselt ilma andmeid kaotamata

1. samm:

➤ Valige esimene lahtrite rühm, mida soovite ühendada (selles näites Charles Dickens'i raamatud).

2. samm:

➤ Minge Avaleht> Ühinemine & Keskus tööriist Exceli tööriistaribal jaotises nimega Kohandamine .

3. samm:

➤ Klõpsake rippmenüüs.

➤ Valikuvõimalustest valige Ühinemine & Keskus .

4. samm:

➤ Klõpsa Ühinemine & Keskus .

➤ Leiad valitud rakkude rühma, mis on ühendatud ühte lahtrisse, kuid sisaldab ainult esimese lahtri väärtust (antud näites Great Dickens).

5. samm:

➤ Te võite korrata sama protseduuri ülejäänud lahtrite rühma puhul, et ühendada need üheks lahtriks.

Loe edasi: Kuidas ühendada ja tsentreerida lahtrid Excelis

2. Kasutage Ampersand (&) sümbolit, et ühendada lahtrid Excelis vertikaalselt ilma andmeid kaotamata

Eespool mainitud meetod liidab rakkude rühma üheks rakuks, kuid see ei täida meie nõuet täielikult.

See säilitab väärtuse ainult esimesest lahtrist, mitte kõigist lahtritest.

See tähendab, et see kaotab andmeid.

Rühma lahtrite väärtuste ühendamiseks ühte lahtrisse saate kasutada valemit, mis sisaldab valemit Ampersand (&) sümbol.

Esimese lahtrirühma valem on järgmine:

=C4&", "&C5&", "&C6

Märkus:

  • Siin olen kasutanud komad (,) vahel raamatute nimed, mis näevad esinduslikumad välja. Võite kasutada mida iganes soovite.

Seejärel korrake sama protseduuri kõigi rakurühmade puhul.

3. Kasutage valemit Exceli lahtrite vertikaalseks ühendamiseks ilma andmeid kaotamata

Selle asemel, et kasutada Ampersand (&) sümboliga, võite kasutada CONCATENATE funktsioon Exceli rakkude rühma ühendamiseks üheks lahtriks.

Esimese rakurühma ühendamise valem on järgmine:

=CONCATENATE(C4,", ",C5,", ",C6)

Märkus:

  • Siin olen kasutanud ka komad (,) raamatute nimede vahel. Võite kasutada mida iganes soovite.

Seejärel saate seda valemit kasutada ülejäänud lahtrite rühma jaoks, et ühendada need üheks lahtriks.

4. Käivita VBA-koodid Exceli lahtrite vertikaalseks ühendamiseks ilma andmeid kaotamata

Kõik eespool nimetatud meetodid toimivad suurepäraselt, kuid siiski ei täida nad meie eesmärki täielikult.

Tahame tuletada sellise meetodi, mis ühendab kõik rakurühmad ühe klõpsuga üksikuteks rakkudeks.

Ja jah, selleks on võimalusi. Selles jaotises tuletame meetodi, mis kasutab VBA kood, mis ühendab kõik rakurühmad üksikuteks rakkudeks kõige lihtsamalt.

1. samm:

➤ Press ALT+F11 klaviatuuril. VBA aken avaneb.

2. samm:

➤ Minge Sisesta VBA akna vahekaart.

➤ Valikuvõimalustest valige Moodul .

3. samm:

➤ Uus mooduli aken nimega "Moodul 1" avatakse.

➤ Lisage järgmine tekst VBA kood moodulis.

Kood: 

 Sub Merging_Rows() Dim out As Variant out = " Dim start As Variant start = 1 Dim ending As Variant ending = 1 Dim i As Variant Dim j As Variant For i = 2 To Selection.Rows.Count + 1 If Selection(i, 1) "" Or i = Selection.Rows.Count + 1 Then ending = i - 1 For j = start To ending If j = ending Then out = out + Range(Selection(j, 2).Address).ValueElse: out = out + Range(Selection(j, 2).Address).Value + vbNewLine End If Next j Range(Selection(start, 2).Address) = out Range(Selection(start, 1).Address + ":" + Selection(ending, 1).Address).Merge Across:=False Range(Selection(start, 2).Address + ":" + Selection(ending, 2).Address).Merge Across:=False start = iout = "" End If Next i End Sub

4. samm:

➤ Salvestage töövihik kui Exceli makrofunktsiooniga töövihik .

5. samm:

➤ Pöörduge tagasi oma töövihikusse ja valige andmekogum (ilma Veergude pealkirjad ).

6. samm:

➤ Press ALT+F8 klaviatuuril.

➤ Dialoogiboks nimega Makro avaneb. Valige Merging_Rows (Ridade ühendamine) ja klõpsake Käivita .

6. samm:

➤ Saate hoiatus kasti, mis ütleb teile, et lahtrite ühendamine säilitab ainult lahtri vasakpoolse ülemise väärtuse ja jätab muud väärtused kõrvale.

➤ Klõpsake nuppu OK .

7. samm:

➤ Saate paar korda sama hoiatusakna. Klõpsake nuppu OK iga kord.

➤ Lõpuks leiate kõik oma rakurühmad vertikaalselt ühendatud üksikuteks rakkudeks, näiteks nii.

Kokkuvõte

Nende meetodite abil saate Excelis lahtrid vertikaalselt ühendada ilma andmeid kaotamata. Kas teate mõnda muud meetodit? Või on teil küsimusi? Küsige julgelt.

Eelmine postitus Kuidas kasutada SUMIFS-funktsiooni Excelis (6 praktilist näidet)
Järgmine postitus Kuidas konverteerida number sõnadesse Excelis (4 sobivat viisi)

Hugh West on suurte kogemustega Exceli koolitaja ja analüütik, kellel on selles valdkonnas üle 10-aastane kogemus. Tal on raamatupidamise ja rahanduse bakalaureusekraad ning ärijuhtimise magistrikraad. Hugh’l on kirg õpetamise vastu ning ta on välja töötanud ainulaadse õpetamisviisi, mida on lihtne järgida ja mõista. Tema Exceli ekspertteadmised on aidanud tuhandetel õpilastel ja spetsialistidel üle maailma oma oskusi parandada ja karjääris silma paista. Oma ajaveebi kaudu jagab Hugh oma teadmisi maailmaga, pakkudes tasuta Exceli õpetusi ja veebikoolitusi, mis aitavad üksikisikutel ja ettevõtetel oma potentsiaali täielikult ära kasutada.