Kā vertikāli apvienot Excel šūnas, nezaudējot datus

Hugh West

16-10-2023 Excel pamati
  • Dalīties Ar Šo
Hugh West

Viens no svarīgākajiem un visbiežāk izmantotajiem uzdevumiem, kas mums jāveic, strādājot programmā Excel, ir vertikāli apvienot šūnas, nezaudējot datus. Šodien es jums parādīšu, kā varat vertikāli apvienot šūnas programmā Excel, nezaudējot datus.

Lejupielādēt Practice Workbook

Vertikāla šūnu apvienošana, nezaudējot datus.xlsm

4 vienkāršas metodes, kā Excel vertikāli apvienot šūnas, nezaudējot datus

Šeit mums ir datu kopa ar dažu autoru vārdiem un viņu grāmatām grāmatnīcā ar nosaukumu Martin Bookstore.

Mūsu šodienas mērķis ir vertikāli vienā šūnā apvienot viena autora grāmatu nosaukumus, nezaudējot datus.

1. Palaist apvienošanas un centrēšanas rīku no Excel rīkjoslas, lai apvienotu šūnas programmā Excel vertikāli, nezaudējot datus

1. solis:

➤ Izvēlieties pirmo šūnu grupu, ko vēlaties apvienot (šajā piemērā - Čārlza Dikensa grāmatas).

2. solis:

➤ Dodieties uz Mājas> Apvienot & amp; Centrs rīks Excel rīkjoslā sadaļā ar nosaukumu Saskaņošana .

3. solis:

➤ Noklikšķiniet uz nolaižamajā izvēlnē.

➤ No pieejamajām opcijām izvēlieties Apvienot & amp; Centrs .

4. solis:

➤ Noklikšķiniet uz Apvienot & amp; Centrs .

➤ Atradīsiet atlasīto šūnu grupu, kas apvienota vienā šūnā, taču tajā ir tikai pirmās šūnas vērtība (šajā piemērā - Great Dickens).

5:

➤ To pašu procedūru varat atkārtot pārējām šūnu grupām, lai tās apvienotu vienā šūnā.

Lasīt vairāk: Kā apvienot un centrēt šūnas programmā Excel

2. Izmantojiet simbolu ampersanda (&), lai Excel vertikāli apvienotu šūnas, nezaudējot datus

Iepriekš minētā metode apvieno šūnu grupu vienā šūnā, taču tā pilnībā neatbilst mūsu prasībām.

Tā saglabā vērtību tikai no pirmās šūnas, nevis no visām šūnām.

Tas nozīmē, ka tiek zaudēti dati.

Lai šūnu grupas vērtības apvienotu vienā šūnā, varat izmantot formulu, kas sastāv no šādas formulas Ampersands (&) simbols.

Pirmās šūnu grupas formula būs šāda:

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

Piezīme:

  • Šeit esmu izmantojis komati (,) starp grāmatu nosaukumiem, lai izskatītos reprezentatīvi. Varat izmantot jebko, kas jums patīk.

Pēc tam atkārtojiet to pašu procedūru visām šūnu grupām.

3. Izmantojiet formulu, lai apvienotu Excel šūnas vertikāli, nezaudējot datus

Tā vietā, lai izmantotu Ampersands (&) simbols, varat izmantot CONCATENATE funkcija programmā Excel, lai apvienotu šūnu grupu vienā šūnā.

Pirmās šūnu grupas apvienošanas formula būs šāda:

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

Piezīme:

  • Šeit esmu izmantojis arī komati (,) starp grāmatu nosaukumiem. Varat izmantot jebkuru, kas jums patīk.

Pēc tam varat izmantot šo formulu pārējai šūnu grupai, lai tās apvienotu vienā šūnā.

4. Palaist VBA kodus, lai Excel vertikāli apvienotu šūnas, nezaudējot datus

Visas iepriekš minētās metodes darbojas lieliski, tomēr tās pilnībā neatbilst mūsu mērķim.

Mēs vēlamies iegūt šādu metodi, kas ar vienu klikšķi apvienos visas šūnu grupas vienotās šūnās.

Un jā, ir veidi, kā to izdarīt. Šajā sadaļā mēs izstrādāsim metodi, izmantojot VBA kodu, kas pēc iespējas vienkāršākā veidā apvienos visas šūnu grupas atsevišķās šūnās.

1. solis:

➤ Spiediet ALT+F11 uz tastatūras. VBA tiks atvērts logs.

2. solis:

➤ Dodieties uz Ievietot VBA loga cilne.

➤ No pieejamajām opcijām izvēlieties Modulis .

3. solis:

➤ Tiek atvērts jauns moduļa logs ar nosaukumu "1. modulis" tiks atvērts.

➤ Ievietojiet šādu tekstu VBA kods modulī.

Kods: 

 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. solis:

➤ Saglabājiet darbgrāmatu kā Excel darbgrāmata ar makrodatoriem .

5:

➤ Atgriezieties savā darbgrāmatā un atlasiet datu kopu (bez Kolonnu virsraksti ).

6. solis:

➤ Spiediet ALT+F8 uz tastatūras.

➤ Dialoglodziņš ar nosaukumu Makro tiks atvērts. Izvēlieties Merging_Rows un noklikšķiniet uz Palaist .

6. solis:

➤ Jums tiks parādīts brīdinājuma logs, kurā būs norādīts, ka, apvienojot šūnas, tiek saglabāta tikai augšējās kreisās šūnas vērtība, bet pārējās vērtības tiek izmestas.

➤ Noklikšķiniet uz LABI .

7. solis:

➤ Tas pats brīdinājuma logs parādīsies vairākas reizes. Noklikšķiniet uz LABI katru reizi.

➤ Visbeidzot visas šūnu grupas vertikāli tiks apvienotas vienā šādā veidā.

Secinājums

Izmantojot šīs metodes, varat apvienot Excel šūnas vertikāli, nezaudējot datus. Vai jums ir zināma kāda cita metode? Vai jums ir kādi jautājumi? Uzdodiet mums jautājumu.

Iepriekšējais ieraksts Kā lietot SUMIFS funkciju programmā Excel (6 praktiski piemēri)
Nākamais ieraksts Kā konvertēt skaitli uz vārdiem programmā Excel (4 piemēroti veidi)

Hjū Vests ir ļoti pieredzējis Excel treneris un analītiķis ar vairāk nekā 10 gadu pieredzi šajā nozarē. Viņam ir bakalaura grāds grāmatvedībā un finansēs un maģistra grāds uzņēmējdarbības vadībā. Hjū aizraujas ar mācīšanu, un viņš ir izstrādājis unikālu mācīšanas pieeju, kas ir viegli izpildāma un saprotama. Viņa ekspertu zināšanas programmā Excel ir palīdzējušas tūkstošiem studentu un profesionāļu visā pasaulē uzlabot savas prasmes un izcelties karjerā. Izmantojot savu emuāru, Hjū dalās savās zināšanās ar pasauli, piedāvājot bezmaksas Excel apmācības un tiešsaistes apmācību, lai palīdzētu personām un uzņēmumiem pilnībā izmantot savu potenciālu.