Jak scalić komórki w Excelu pionowo bez utraty danych

Hugh West

16-10-2023 Podstawy programu Excel
  • Udostępnij To
Hugh West

Jednym z najważniejszych i szeroko stosowanych zadań, które musimy wykonać podczas pracy w Excelu jest scalanie komórek w pionie bez utraty danych. Dziś pokażę Ci jak możesz scalić komórki w Excelu w pionie bez utraty danych.

Pobierz Zeszyt ćwiczeń

Scalanie komórek w pionie bez utraty danych.xlsm

4 Proste metody łączenia komórek w Excelu w pionie bez utraty danych

Mamy tu zbiór danych z Nazwiskami pewnych Autorów i ich Książek w księgarni o nazwie Martin Bookstore.

Naszym dzisiejszym celem jest połączenie nazw książek tego samego autora w pionie w jednej komórce bez utraty danych.

1. uruchom narzędzie Scal i wyśrodkuj z paska narzędzi Excel, aby scalić komórki w Excelu pionowo bez utraty danych

Krok 1:

➤ Zaznacz pierwszą grupę komórek, które chcesz scalić (W tym przykładzie są to książki Charlesa Dickensa).

Krok 2:

➤ Idź do Home> Merge & Center narzędzie w pasku narzędziowym programu Excel w sekcji o nazwie Dostosowanie .

Krok 3:

➤ Kliknij na menu rozwijane.

➤ Z dostępnych opcji wybierz Merge & Center .

Krok 4:

➤ Kliknij na Merge & Center .

➤ Znajdziesz wybraną grupę komórek połączonych w jedną komórkę, ale zawierającą tylko wartość z pierwszej komórki (w tym przykładzie Great Dickens).

Krok 5:

➤ Tę samą procedurę można powtórzyć dla pozostałej grupy komórek, aby połączyć je w jedną komórkę.

Czytaj więcej: Jak scalić i wyśrodkować komórki w programie Excel

2) Użyj symbolu ampersand (&), aby połączyć komórki w Excelu pionowo bez utraty danych

Wspomniana metoda łączy grupę komórek w jedną komórkę, ale nie spełnia całkowicie naszego wymagania.

Zachowuje wartość tylko z pierwszej komórki, a nie ze wszystkich komórek.

To znaczy, że traci dane.

Aby połączyć wartości z grupy komórek w jedną komórkę, można użyć formuły składającej się z polecenia Ampersand (&) symbol.

Formuła dla pierwszej grupy komórek będzie miała postać:

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

Uwaga:

  • Tutaj użyłem przecinki (,) pomiędzy nazwami książek, by wyglądać reprezentacyjnie. Możesz użyć czegokolwiek, co ci się podoba.

Następnie powtórz tę samą procedurę dla wszystkich grup komórek.

3) Użyj formuły, aby połączyć komórki w Excelu pionowo bez utraty danych

Zamiast używać Ampersand (&) można użyć symbolu Funkcja CONCATENATE Excela, aby scalić grupę komórek w jedną komórkę.

Formuła scalająca pierwszą grupę komórek będzie miała postać:

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

Uwaga:

  • Tutaj również użyłem przecinki (,) pomiędzy nazwami książek. Możesz użyć czegokolwiek, co ci się podoba.

Następnie możesz użyć tej formuły dla pozostałej grupy komórek, aby połączyć je w jedną komórkę.

4. uruchomić kody VBA, aby połączyć komórki w Excelu pionowo bez utraty danych

Wszystkie wymienione powyżej metody działają bez zarzutu, ale mimo to nie spełniają całkowicie naszego celu.

Chcemy wyprowadzić taką metodę, która za pomocą jednego kliknięcia połączy wszystkie grupy komórek w pojedyncze komórki.

I tak, są na to sposoby. W tym rozdziale wyprowadzimy metodę z wykorzystaniem VBA kod, który w najprostszy sposób połączy wszystkie grupy komórek w pojedyncze komórki.

Krok 1:

➤ Naciśnij ALT+F11 na klawiaturze. VBA otworzy się okno.

Krok 2:

➤ Idź do Wkładka zakładka w oknie VBA.

➤ Z dostępnych opcji wybierz Moduł .

Krok 3:

➤ Pojawi się nowe okno modułu o nazwie "Moduł 1" otworzy się.

➤ Wprowadzić następujące elementy VBA kod w module.

Kod: 

 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 = i.out = "" End If Next i End Sub

Krok 4:

➤ Zapisz skoroszyt jako Skoroszyt z obsługą makr w programie Excel .

Krok 5:

➤ Wróć do swojego skoroszytu i wybierz zestaw danych (bez Nagłówki kolumn ).

Krok 6:

➤ Naciśnij ALT+F8 na swojej klawiaturze.

➤ Pojawi się okno dialogowe o nazwie Makro Otworzy się. Wybierz Łączenie_wierszy i kliknąć na Uruchom .

Krok 6:

➤ Pojawi się okno ostrzegawcze informujące, że łączenie komórek zachowuje tylko wartość komórki w lewym górnym rogu, a pozostałe wartości są odrzucane.

➤ Kliknij na OK .

Krok 7:

➤ Kilka razy pojawi się to samo okno ostrzegawcze.Kliknij na OK za każdym razem.

➤ Na koniec znajdziesz wszystkie swoje grupy komórek połączone pionowo w pojedyncze komórki, jak poniżej.

Wniosek

Korzystając z tych metod, możesz scalić komórki w Excelu w pionie bez utraty danych. Czy znasz jakąś inną metodę? A może masz jakieś pytania, zapraszamy do zadawania pytań.

Poprzedni post Jak używać funkcji SUMIFS w Excelu (6 poręcznych przykładów)
Następny post Jak przekonwertować liczbę na słowa w Excelu (4 odpowiednie sposoby)

Hugh West jest bardzo doświadczonym trenerem i analitykiem Excela z ponad 10-letnim doświadczeniem w branży. Posiada tytuł licencjata w dziedzinie rachunkowości i finansów oraz tytuł magistra administracji biznesowej. Hugh ma pasję do nauczania i opracował unikalne podejście do nauczania, które jest łatwe do naśladowania i zrozumienia. Jego specjalistyczna wiedza na temat programu Excel pomogła tysiącom studentów i profesjonalistów na całym świecie doskonalić swoje umiejętności i osiągać doskonałe wyniki w karierze. Za pośrednictwem swojego bloga Hugh dzieli się swoją wiedzą ze światem, oferując bezpłatne samouczki programu Excel i szkolenia online, aby pomóc osobom indywidualnym i firmom w pełni wykorzystać swój potencjał.