Jak połączyć tylko widoczne komórki w programie Excel?
Jeśli masz listę przefiltrowanych danych, wystarczy połączyć tylko widoczne komórki i zignorować ukryte komórki, aby uzyskać następujący połączony wynik. Jak możesz szybko i łatwo zakończyć to zadanie w programie Excel?
Połącz tylko widoczne wartości komórek w jedną komórkę z kodem VBA
Połącz tylko widoczne wartości komórek w jedną komórkę z kodem VBA
Można utworzyć Funkcja zdefiniowana przez użytkownika aby rozwiązać tę pracę, wykonaj następujące czynności:
1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. Kliknij wstawka > Modułi wklej następujący kod w Moduł Okno.
Kod VBA: Łącz tylko widoczne wartości komórek:
Private Function ConcatenateVisible(xRg As Variant, sptChar As String)
'Updateby Extendoffice
Dim rg As Range
For Each rg In xRg
If (rg.EntireRow.Hidden = False) And (rg.EntireColumn.Hidden = False) Then
ConcatenateVisible = ConcatenateVisible & rg.Value & sptChar
End If
Next
ConcatenateVisible = Left(ConcatenateVisible, Len(ConcatenateVisible) - Len(sptChar))
End Function
3. Następnie zapisz i zamknij ten kod, wróć do arkusza i wprowadź następującą formułę: = concatenatevisible (B2: B10, „-”) (B2: B10 to filtrowany zakres danych, który chcesz połączyć, „-”To separator służący do oddzielania połączonych wartości, możesz je zmienić według potrzeb.) W pustą komórkę, w której chcesz zlokalizować połączony wynik, a następnie naciśnij Wchodzę aby uzyskać wynik. Zobacz zrzut ekranu:
Note: Dzięki tej funkcji zdefiniowanej przez użytkownika połączony wynik zostanie zmieniony dynamicznie wraz z przefiltrowanymi danymi, na przykład, jeśli filtrujesz produkt KTO, połączony wynik zostanie zmieniony na nowe przefiltrowane dane. Zobacz zrzut ekranu:
Najlepsze narzędzia biurowe
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 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!