Sut i guddio neu guddio rhesi neu golofnau penodol wrth glicio ddwywaith ar gell yn Excel?
Fel rheol, gellir cuddio neu arddangos rhesi a cholofnau trwy glicio ar y dde a dewis yr opsiwn Cuddio neu Unhide o'r ddewislen cyd-destun. Yn yr erthygl hon, rydym yn sôn am guddio neu arddangos rhesi neu golofnau penodol yn gyflym trwy glicio ddwywaith ar gell yn Excel.
Cuddio neu guddio rhesi neu golofnau penodedig wrth glicio ddwywaith ar gell â chod VBA
Cuddio neu guddio rhesi neu golofnau penodedig wrth glicio ddwywaith ar gell â chod VBA
Gall y codau VBA canlynol eich helpu i guddio neu ddadorchuddio rhesi neu golofnau penodol mewn taflen waith trwy glicio ddwywaith ar gell benodol. Gwnewch fel a ganlyn.
1. Agorwch y daflen waith rydych chi am guddio rhesi neu golofnau y tu mewn iddi. De-gliciwch y tab dalen ac yna cliciwch Gweld y Cod o'r ddewislen cyd-destun.
2. Yn yr agoriad Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, copïwch yn dilyn y cod VBA i mewn i ffenestr y Cod.
VBA: Cuddio / dadorchuddio rhesi penodedig trwy glicio celloedd ddwywaith yn y daflen waith:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
Dim xRgHidden As Range
If (Not Intersect(Target, Range("A1:A4")) Is Nothing) And (Target.Count = 1) Then
Set xRgHidden = Range("10:13")
xRgHidden.EntireRow.Hidden = Not xRgHidden.EntireRow.Hidden
End If
End Sub
VBA: Cuddio / dadorchuddio colofnau penodedig trwy glicio celloedd ddwywaith yn y daflen waith:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
Dim xRgHidden As Range
If (Not Intersect(Target, Range("A1:A4")) Is Nothing) And (Target.Count = 1) Then
Set xRgHidden = Range("D:E")
xRgHidden.EntireColumn.Hidden = Not xRgHidden.EntireColumn.Hidden
End If
End Sub
Nodyn: Yn y cod, A1: A4, 10:13 ac D: E. nodwch, wrth glicio ddwywaith ar unrhyw gell o'r ystod A1: A4, y bydd y rhes 10:13 neu golofn D: E yn cael ei chuddio'n awtomatig.
3. Gwasgwch y Alt + F11 allweddi i gau'r Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
O hyn ymlaen, wrth glicio ddwywaith bydd unrhyw gell yn ystod A1: A4, rhes 10:13 neu golofn D: E yn cael ei chuddio’n awtomatig. A chlicio ddwywaith ar y gell eto i arddangos yr holl resi neu golofnau cudd ar unwaith.
Erthyglau cysylltiedig:
- Sut i glicio neu glicio dwbl cell i agor ffurflen ddefnyddiwr benodol yn Excel?
- Sut i ychwanegu marc gwirio mewn cell gyda chlicio ddwywaith yn Excel?
- Sut i ychwanegu / nodi dyddiad / amser cyfredol mewn cell gyda chlicio ddwywaith yn Excel?
- Sut i glicio cell ddwywaith ac ychwanegu 1 at y gwerth cell hwnnw yn Excel?
- Sut i popio calendr wrth glicio cell benodol yn 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!