Jak zřetězit pouze viditelné buňky v aplikaci Excel?
Pokud máte seznam filtrovaných dat, nyní stačí zřetězit pouze viditelné buňky a ignorovat skryté buňky, abyste získali následující kombinovaný výsledek. Jak jste mohli tento úkol rychle a snadno dokončit v aplikaci Excel?
Zřetězit pouze viditelné hodnoty buněk do jedné buňky s kódem VBA
Zřetězit pouze viditelné hodnoty buněk do jedné buňky s kódem VBA
Můžete vytvořit Uživatelem definovaná funkce k vyřešení této úlohy proveďte následující kroky:
1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.
2, klikněte Vložit > Modula vložte následující kód do Modul Okno.
Kód VBA: Zřetězit pouze viditelné hodnoty buněk:
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. Poté tento kód uložte a zavřete, vraťte se do listu a zadejte tento vzorec: = concatenatevisible (B2: B10, "-") (B2: B10 je filtrovaný rozsah dat, který chcete kombinovat, “-„Je oddělovač pro oddělení kombinovaných hodnot, můžete je podle potřeby změnit.) Do prázdné buňky, kde chcete vyhledat kombinovaný výsledek, a poté stiskněte vstoupit klíč k získání výsledku. Viz snímek obrazovky:
Poznámka: S touto uživatelem definovanou funkcí se kombinovaný výsledek změní s filtrovanými daty dynamicky, například pokud filtrujete produkt KTO, váš kombinovaný výsledek se změní na nová filtrovaná data. Viz snímek obrazovky:
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!