Note: The other languages of the website are Google-translated. Back to English

Sut i dynnu neu guddio ffiniau o flychau grŵp yn Excel?

Yn Excel, efallai y byddwch chi'n creu rhai blychau grŵp i grwpio botymau amlddewis ar gyfer gwneud cwestiwn amlddewis, felly bydd blychau grŵp o amgylch y botymau opsiwn, ac mae'r llinellau blwch yn edrych yn flêr oherwydd nad yw'r llinellau mor syth â'r celloedd. Yr erthygl hon, byddaf yn cyflwyno rhai triciau i chi i guddio neu dynnu'r ffiniau neu'r llinellau o'r blychau grŵp er mwyn sicrhau bod y daflen waith yn cael ei gweld yn gliriach fel y llun a ddangosir:

ffiniau blwch grŵp cuddio doc 1

Tynnu neu guddio ffiniau o flychau grŵp gydag un cod

Tynnu neu guddio ffiniau o flychau grŵp gyda chod VBA


swigen dde glas saeth Tynnu neu guddio ffiniau o flychau grŵp gydag un cod


I guddio neu dynnu llinellau ffin y blychau grŵp, dyma un sgript a allai eich helpu chi, gwnewch fel hyn:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Yna pwyswch Ctrl + G i agor y Ar unwaith ffenestr, yn y Ar unwaith ffenestr, teipiwch y cod hwn: activesheet.groupboxes.visible = ffug, gweler y screenshot:

ffiniau blwch grŵp cuddio doc 2

3. Ar ôl nodi'r cod, ac yna pwyswch Rhowch allwedd, ac yn awr, gallwch weld bod ffiniau'r blychau grŵp wedi'u cuddio ar unwaith.

Nodyn: I arddangos y ffiniau eto, cymhwyswch y cod hwn: activesheet.groupboxes.visible = gwir, a'r wasg Rhowch allweddol.


swigen dde glas saeth Tynnu neu guddio ffiniau o flychau grŵp gyda chod VBA

Heblaw am y cod uchod, dyma god VBA arall a all hefyd eich helpu chi, gwnewch fel a ganlyn:

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: Tynnu neu guddio ffiniau o flychau grŵp:

Sub ToggleVisible()
Dim myGB As GroupBox
For Each myGB In ActiveSheet.GroupBoxes
myGB.Visible = False
Next myGB
End Sub

3. Yna, pwyswch F5 yn allweddol i redeg y cod hwn, mae holl ffiniau'r blychau grŵp ar y daflen waith weithredol wedi'u cuddio ar unwaith, gweler y screenshot:

ffiniau blwch grŵp cuddio doc 1


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a 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!
gwaelod officetab
sylwadau (2)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Darn o god neis iawn, diolch. Wedi helpu i ddatrys problem cleient! Yn gallu ei toglo: Is ToggleVisible() Dim myGB Fel GroupBox Ar gyfer Pob MyGB Yn ActiveSheet.GroupBoxes myGB.Visible = IIf(myGB.Visible, Gau, Gwir) Nesaf myGB Diwedd Is
Lleihawyd y sylw hwn gan y safonwr ar y wefan
helo bois,
Mae angen i mi ddewis botwm lluosog i grynhoi fy sgorau. os yw hyn yn bosibl pls yn awgrymu fy syniad.?
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir