Hoe alleen zichtbare cellen in Excel samen te voegen?
Als u een lijst met gefilterde gegevens heeft, hoeft u nu alleen de zichtbare cellen samen te voegen en de verborgen cellen te negeren om het volgende gecombineerde resultaat te krijgen. Hoe zou u deze taak snel en gemakkelijk in Excel kunnen voltooien?
Voeg alleen zichtbare celwaarden samen in één cel met VBA-code
Voeg alleen zichtbare celwaarden samen in één cel met VBA-code
U kunt maken een Door de gebruiker gedefinieerde functie Voer de volgende stappen uit om deze klus op te lossen:
1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: voeg alleen zichtbare celwaarden samen:
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. Sla vervolgens deze code op en sluit deze, ga terug naar het werkblad en voer deze formule in: = concatenatevisible (B2: B10, "-") (B2: B10 is het gefilterde gegevensbereik dat u wilt combineren, "-"Is het scheidingsteken om de gecombineerde waarden te scheiden, u kunt ze naar wens wijzigen.) In een lege cel waar u het gecombineerde resultaat wilt zoeken, en druk vervolgens op Enter sleutel om het resultaat te krijgen. Zie screenshot:
Note: Met deze door de gebruiker gedefinieerde functie wordt het gecombineerde resultaat dynamisch gewijzigd met uw gefilterde gegevens. Als u bijvoorbeeld het product van KTO filtert, wordt uw gecombineerde resultaat gewijzigd in de nieuwe gefilterde gegevens. Zie screenshot:
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!