Sut i symio gwerthoedd yn gyflym ac eithrio colofnau cudd yn Excel?
I grynhoi gwerthoedd ac eithrio rhesi cudd, gallwch ddefnyddio'r fformiwla = SUBTOTAL () i ddatrys, ond, beth am grynhoi gwerthoedd gan anwybyddu colofnau cudd? Yma mae'r erthygl hon yn cyflwyno'r triciau ar grynhoi gwerthoedd yn gyflym yn y colofnau gweladwy yn unig.
Gwerthoedd swm heb gynnwys colofnau cudd gyda VBA
Swm / cyfartaledd / cyfrif heb gynnwys colofnau cudd gyda Kutools ar gyfer Excel
Gwerthoedd swm heb gynnwys colofnau cudd gyda VBA
Dyma god VBA a all eich helpu i grynhoi colofnau gweladwy yn gyflym yn unig.
1. Gwasgwch Alt + F11 allweddi i'w harddangos Microsoft Visual ar gyfer Cymwysiadau Sylfaenol ffenestr.
2. Cliciwch Mewnosod > Modiwlau a gludo islaw'r cod i'r newydd Modiwlau ffenestr.
VBA: Swm gwerthoedd colofn gweladwy yn unig
Public Function SumVisible(Rg As Range) As Double
'UpdatebyExtendOffice20160302
Dim xCell As Range
Dim xRg As Range
Dim xOutRg As Range
On Error Resume Next
Application.Volatile
Set xRg = Application.Intersect(Rg, Rg.Worksheet.UsedRange)
If Not (xRg Is Nothing) Then
For Each xCell In xRg
If (xCell.EntireRow.Hidden = False) And _
(xCell.EntireColumn.Hidden = False) Then
If xOutRg Is Nothing Then
Set xOutRg = xCell
Else
Set xOutRg = Application.Union(xCell, xOutRg)
End If
End If
Next
End If
If Not xOutRg Is Nothing Then
SumVisible = Application.Evaluate("SUM(" & xOutRg.Address & ")")
Else
SumVisible = 0
End If
End Function
3. Cadwch god a chau'r ffenestr, yna ewch yn ôl i ddewis cell wag y byddwch chi'n rhoi'r canlyniad wedi'i chyfrifo arni, a theipio'r fformiwla hon = SumVisible (A1: C9), y wasg Rhowch yn allweddol, mae'r canlyniad crynhoi cywir wedi'i gael.
Tip: Yn y fformiwla, A1: C9 yw'r celloedd rydych chi am eu crynhoi.
Swm / cyfartaledd / cyfrif heb gynnwys colofnau cudd gyda Kutools ar gyfer Excel
Efallai nad ydych chi'n gyfarwydd â chod VBA, ond os oes gennych chi hynny Kutools ar gyfer Excel wedi'i osod, gallwch chi ddatrys y swydd hon yn gyflym ac yn hawdd.
Kutools ar gyfer Excel, gyda mwy na 300 swyddogaethau defnyddiol, yn gwneud eich swyddi yn haws. |
Ar ôl gosod am ddim Kutools ar gyfer Excel, gwnewch fel isod:
1. Dewiswch gell wag a fydd yn rhoi'r canlyniad crynhoi, E1 er enghraifft, a chlicio Kutools > Swyddogaethau Kutools > Ystadegol a Mathemateg > CRYNODEB. Gweler y screenshot:
2. Yn y Dadleuon Swyddogaeth deialog, cliciwch i ddewis celloedd rydych chi am eu crynhoi i mewn i'r Cyfeirnod blwch testun, a gallwch gael rhagolwg o'r canlyniad wedi'i gyfrifo ar y gwaelod. Gweler y screenshot:
3. Cliciwch OK, a dim ond y colofnau gweladwy sydd wedi'u crynhoi.
Gyda Kutools ar gyfer Excel, gallwch hefyd gyfrif neu gyfrifo'r cyfartaledd mewn celloedd / rhes / colofnau gweladwy. Gweler y screenshot:
Tip: Gallwch hefyd deipio'r fformiwla hon yn uniongyrchol = CRYNODEB (A1: C9)/ = GWLEDIG (A1: C9)/ = AR GYFER (A1: C9) i mewn i'r gell i gael y canlyniad ar ôl ei osod Kutools ar gyfer Excel.
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!