Sut i gyd-fynd â chelloedd gweladwy yn Excel yn unig?
Os oes gennych chi restr o ddata wedi'i hidlo, nawr, does ond angen i chi gyd-fynd â'r celloedd gweladwy yn unig ac anwybyddu'r celloedd cudd i gael y canlyniad cyfun canlynol. Sut allech chi orffen y dasg hon yn gyflym ac yn hawdd yn Excel?
Concatenate dim ond gwerthoedd celloedd gweladwy i mewn i un gell gyda chod VBA
Concatenate dim ond gwerthoedd celloedd gweladwy i mewn i un gell gyda chod VBA
Gallwch greu a Swyddogaeth Diffiniedig Defnyddiwr i ddatrys y swydd hon, gwnewch y camau canlynol:
1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Modiwlau Ffenestr.
Cod VBA: Concatenate dim ond gwerthoedd celloedd gweladwy:
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. Yna arbedwch a chau'r cod hwn, ewch yn ôl i'r daflen waith, a nodi'r fformiwla hon: = cyd-fynd (B2: B10, "-") (B2: B10 yw'r ystod ddata wedi'i hidlo rydych chi am ei chyfuno, “-”Yw'r gwahanydd i wahanu'r gwerthoedd cyfun, gallwch eu newid i'ch angen.) I mewn i gell wag lle rydych chi am ddod o hyd i'r canlyniad cyfun, ac yna pwyso Rhowch allwedd i gael y canlyniad. Gweler y screenshot:
Nodyn: Gyda'r Swyddogaeth Diffiniedig Defnyddiwr hon, bydd y canlyniad cyfun yn cael ei newid gyda'ch data wedi'i hidlo'n ddeinamig, er enghraifft, os ydych chi'n hidlo Cynnyrch KTO, bydd eich canlyniad cyfun yn cael ei newid i'r data newydd wedi'i hidlo. Gweler y screenshot:
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!