Przejdź do głównej zawartości

Jak połączyć teksty wielu komórek w pole tekstowe w programie Excel?

Łączenie tekstów wielu komórek w nową komórkę z formułą może być łatwe. Ale czy wiesz, jak połączyć wartości wielu komórek w pole tekstowe (formant ActiveX)? Właściwie metoda opisana w tym artykule może ci w tym pomóc.

Połącz teksty wielu komórek w pole tekstowe z kodem VBA


Połącz teksty wielu komórek w pole tekstowe z kodem VBA

Poniższa metoda może pomóc w połączeniu tekstów wielu komórek w polu tekstowym w programie Excel.

1. W arkuszu, w którym chcesz połączyć wiele komórek, wstaw pole tekstowe, klikając Deweloper > wstawka > Pole tekstowe (formant ActiveX). Zobacz zrzut ekranu:

2. Następnie kliknij Deweloper > wstawka > Przycisk polecenia (formant ActiveX) aby wstawić przycisk polecenia do arkusza.

3. Kliknij prawym przyciskiem myszy wstawiony przycisk polecenia, a następnie wybierz Wyświetl kod z menu kontekstowego. Zobacz zrzut ekranu:

4. w Microsoft Visual Basic for Applications oknie, zamień oryginalny kod na poniższy kod VBA.

Kod VBA: połącz teksty wielu komórek w pole tekstowe

Private Sub CommandButton1_Click()
    Dim xRg As Range
    Dim xCell As Range
    Dim xStr As String
    On Error Resume Next
    Set xRg = Application.Selection
    If xRg Is Nothing Then Exit Sub
    With Me.TextBox1
        .Text = vbNullString
        .MultiLine = True
        .WordWrap = True
        For Each xCell In xRg
            xStr = xCell.Value
            .Text = Me.TextBox1 & xStr & Chr(10)
        Next
    End With
End Sub

Note: CommandButton1 to nazwa wstawionego przycisku polecenia. Zmień to w zależności od potrzeb.

5. Wyłącz tryb projektowania, klikając Deweloper > Tryb projektowania.

6. Wybierz komórki, których potrzebujesz, aby połączyć teksty w pole tekstowe, a następnie kliknij Przycisk Polecenia. Następnie zawartość wszystkich wybranych komórek jest natychmiast łączona z polem tekstowym, jak pokazano poniżej.


Podobne artykuły:

Najlepsze narzędzia biurowe

Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

karta kte 201905


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
hola Como el boton puede tomarme las celdas visibles, ya que a veces oculto celdas y me las toma igual pero no quiero
This comment was minimized by the moderator on the site
Muy bueno, Y si le quiero poner ; para separar los textos ¿cómo lo hago?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations