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

Conas bosca seiceála a úsáid chun sraitheanna nó colúin in Excel a cheilt / a cheilt?

Má ghlactar leis go gcaithfidh tú bosca seiceála a úsáid chun sraitheanna nó colúin áirithe a cheilt nó a cheilt. Mar shampla, nuair a dhéantar seiceáil ar an mbosca seiceála um Rialú Gníomhach X, taispeántar na sraitheanna nó na colúin áirithe, ar shlí eile, beidh siad i bhfolach. Taispeánann an t-alt seo duit an modh ar conas bosca seiceála a úsáid chun sraitheanna nó colúin in Excel a cheilt / a cheilt le sonraí.

Úsáid bosca seiceála chun sraitheanna nó colúin le cód VBA a cheilt / a cheilt


Úsáid bosca seiceála chun sraitheanna nó colúin le cód VBA a cheilt / a cheilt

Is féidir leis an gcód VBA seo a leanas cabhrú leat sraitheanna nó colúin áirithe a cheilt / a chur i bhfolach le ticbhosca.

1. Tar éis duit bosca seiceála um Rialú Gníomhach X a chur isteach sa bhileog oibre, cliceáil ar dheis ar an mbosca seiceála agus ansin roghnaigh Féach an cód ón roghchlár cliceáil ar dheis. Féach an pictiúr:

2. Sa Microsoft Visual Basic d’Fheidhmchláir an cód VBA seo a leanas a fhuinneog, a chóipeáil agus a ghreamú isteach i bhfuinneog an Chóid.

Cód VBA: Úsáid bosca seiceála chun sraitheanna nó colúin a cheilt / a cheilt

Private Sub CheckBox1_Click()
    [C:D].EntireColumn.Hidden = Not CheckBox1
End Sub

nótaí:

1. Sa chód VBA, [C: D]. EntireColumn ciallaíonn sé go mbeidh an colún C agus D i bhfolach nó gan cur i bhfolach tríd an mbosca seiceála comhfhreagrach a sheiceáil nó a dhísheiceáil.

2. Chun sraitheanna áirithe mar shraith 6: 9 a cheilt nó a thaispeáint, athraigh an [C: D]. EntireColumn chun [6: 9]. EntireRow sa chód VBA.

3. Brúigh an Eile + Q eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

4. Anois déan an Mód Dearaidh faoi ​​na Forbróir cluaisín mar atá thíos an pictiúr a thaispeántar:

As seo amach, nuair a dhéantar seiceáil ar an mbosca seiceála, taispeántar na sraitheanna nó na colúin shonraithe. Nuair a dhéantar é a dhísheiceáil, cuirtear na sraitheanna nó na colúin shonraithe i bhfolach.


Earraí gaolmhara:


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíonn Office / Excel 2007-2021 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d'fhiontar nó d'eagraíocht. Gnéithe iomlána triail saor in aisce 30-lá. Ráthaíocht airgid ar ais 60-lá.
cluaisín kte 201905

Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
bun officetab
Sórtáil tuairimí de réir
Comments (26)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An bhfuil bealach ann chun an "Úsáid ticbhosca a úsáid chun sraitheanna nó colúin le cód VBA a cheilt/a cheilt" ar bhileog oibre faoi chosaint?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
@Wayne:

Fobhosca Príobháideach 1_Cliceáil()
ActiveSheet.Unprotect Pasfhocal:="xxxxx"
Rows("284:351").EntireRow.Hidden = Gan ticbhosca1
ActiveSheet.Protect Pasfhocal:="xxxx"
Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá an chuma ar an scéal nach rachaidh an cód seo ach i dtreo amháin, is é sin le rá nach n-imíonn sé ach agus ná déan iad a cheilt nuair a chliceáiltear é. An bhfuil bealach ann chun é seo a cheartú?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá an fhadhb chéanna againn ach fuair mé amach go bhfuilimid ag baint úsáide as Rialuithe Foirme agus ní Rialuithe ActiveX. Oibríonn an cód go foirfe sa chnaipe ticbhosca Rialaithe ActiveX. Níl le déanamh ach an Mód Dearaidh a mhúchadh ionas gur féidir leat cliceáil ar an ticbhosca.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá an fhadhb chéanna againn ach faighimid bealach chun é a oibriú. Bain úsáid as ticbhosca Rialuithe ActiveX agus ní ag an ticbhosca Rialaithe Foirme. Oibríonn an cód go foirfe le ticbhosca ActiveX.


Fobhosca Príobháideach 1_Cliceáil()
[C:D].EntireColumn.Hidden = Níl ticbhosca1
Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit,

Táim ag iarraidh an cód seo a úsáid chun leathanach ar leith ón ticbhosca a cheilt/a cheilt. Cad a chaithfidh mé a chur leis chun an obair seo a dhéanamh? Go raibh maith agat roimh ré.

Fobhosca Príobháideach 1_Cliceáil()
[C:D].EntireColumn.Hidden = Níl ticbhosca1
Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dea-lá,
Mar a léirítear sa chód seo a leanas, cuir ainm do leatháin ar leith in ionad an "Bileog 4".

Fobhosca Príobháideach 1_Cliceáil()
[Bileog4!C:D].EntireColumn.Hidden = Gan ticbhosca1
Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh,

Dia duit, tá an cód déanta agam, tá sé ag obair go maith ach nuair a dhéanaim iarracht an rud céanna a dhéanamh i níos mó ná ticbhosca amháin ag an mbileog chéanna oibríonn siad 'le chéile', ní fholaíonn siad ach na sraitheanna nó nach bhfolaigh iad má roghnaítear na trí bhosca seiceála.
Táim ag iarraidh go n-oibreoidh na trí bhosca seiceála seo neamhspleách ar a chéile. Agus lig do na húsáideoirí marcáil ach bosca amháin le haghaidh ag an am.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Hi Lou,
Cinntigh le do thoil gur ticbhoscaí le Rialuithe ActiveX iad na ticbhoscaí a chruthaigh tú. Oibríonn na ticbhoscaí seo go neamhspleách ar do bhileog oibre.
Go raibh maith agat as do chuid barúlacha.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit,

An bhfuil bealach a cheilt ach sraith amháin. Má chuirim 6:9 tá gach sraith i bhfolach, ach mura gcuirim ach 6, tagann sé amach mar earráid. Bheinn buíoch as do chabhair, go raibh maith agat!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh,
Athraigh an dara líne sa chód go:
[6:6].EntireRow.Hidden = Níl ticbhosca1.
Go raibh maith agat as do thuairim.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Bhí mé ag iarraidh an chéad trí ról a cheilt ach ní raibh sé ag obair.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Bealtaine,
Tá brón orm nach bhfuair mé do phointe.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
D'oibrigh sé, ach ansin nuair a shábháil mé an comhad, agus athoscailt ní oibríonn sé. Rinne mé iarracht é a shábháil mar bhileog Macra Excel agus mar leabhar oibre rialta. Cad atá mícheart déanta agam? Ba mhaith liom é a thabhairt do dhuine eile le húsáid agus níl mé ag iarraidh go gcuirfí mearbhall orthu.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit angela,Tar éis duit an cód a chur isteach sa leabhar oibre, cliceáil le do thoil Comhad > Sábháil mar, roghnaigh cá háit a ndéanfaidh tú an comhad a shábháil, sa bhosca dialóige Save As, roghnaigh Leabhar Oibre Macra-Cumasaithe Excel (* .xlsm) ón Sábháil mar chineál anuas , agus ar deireadh cliceáil Sábháil. Ansin seol an leabhar oibre Excel Macro-Cumasaithe seo chuig daoine eile.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An-úsáideach, ach conas is féidir liom é a úsáid chun cuid den scarbhileog a cheilt? Ciallaíonn mé mar shampla cealla B2:B11, conas an dá fheidhm sin a chomhcheangal? Go raibh maith agat.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Cad a tharlóidh má bhí mé ag iarraidh 3 ticbhosca dhifriúla a úsáid agus go raibh mé ag iarraidh orthu gach scoránaigh grúpaí difriúla sraitheanna a cheilt? Tá mé iarracht agus d'fhéach sé ar fud. Nuair a dhéanaim iarracht an cód seo a mhodhnú is cosúil go gcuireann na ticbhoscaí isteach ar a chéile.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Cad a tharlóidh má bhí mé ag iarraidh 3 ticbhosca dhifriúla a úsáid agus go raibh mé ag iarraidh orthu gach scoránaigh grúpaí difriúla sraitheanna a cheilt? Tá mé iarracht agus d'fhéach sé ar fud. Nuair a dhéanaim iarracht an cód seo a mhodhnú is cosúil go gcuireann na ticbhoscaí isteach ar a chéile.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Esse cód oculta, mas não executa and reexibição quando desmarcar.

An rogha comhlántach leis an bhfabhar? beachtas de cód le haghaidh ocultar agus reexibir colunas indicadas.

Fobhosca Príobháideach 1_Cliceáil()
[C:D].EntireColumn.Hidden = Níl ticbhosca1
Fo Deireadh

Go raibh maith agat
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Welington Mesquita,
Is féidir leis an gcód VBA seo:
Nuair a dhéantar an ticbhosca1 a sheiceáil, taispeántar an colún C:D;
Nuair nach bhfuil sé seiceáilte, cuirtear an colún C:D i bhfolach.
Oibríonn an cód go maith i mo chás. Cén leagan Excel atá á úsáid agat?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dea-maidin!
Is féidir a rá go bhfuil tú sásta!

Is é an ceann is mó a shuímh ach an ceann is fearr a fháil ar an amharclann / athchleachtadh agus úsáid a bhaint as an gcolúnaí ó Control ActiveX ar feadh an t-aonair nó an mhír.

Eiseamláirí: Tenho coluna com os ainmneacha: Planejado, Realizado, Análise Ingearach, Análise Ingearach, Variação (R$) agus Variação (%), aon entanto, que poder elecionar individual as colunas intercallando se necessário. Roghnaigh duine éigin a coluna Realizado agus Variação, mesmo não estando agus sequencia.

Desde já agradeço,
Wellington
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh,
Tá brón orm ní thuigim cad atá i gceist agat. Ar mhiste leat seat de do shonraí a sholáthar?
Seans go mbeidh ort gabháil scáileáin nó comhad samplach a cheangal le cur síos níos soiléire ar an bhfadhb a tháinig tú uirthi.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
An bhfuil tú ag súil leis nó léi?
Eiseamláir: A e C

Cad é an cineál sraithe atá agat le haghaidh A e C ?

"Fo-thiceáilBox1_Cliceáil príobháideach ()
[C:D].EntireColumn.Hidden = Não Seicbhosca1
Críoch Fo"
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Haigh,
Is féidir leis an gcód VBA seo a leanas bhfabhar a thabhairt duit. Bain triail as le do thoil.
Private Sub CheckBox1_Click()
'Updated by Extendoffice 20220810
    [C:C, A:A].EntireColumn.Hidden = Not CheckBox1
End Sub
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Bei mir werden die Zellen nicht ausgeblendet, wenn das Kontrollkästchen wieder in aktiv ist.

Mein Ziel ist es mit dem aktiveren des Kontrollkästchen die Zeile 7 einzublenden und wenn ich den Haken wieder entferne sollte Zeile 47 wieder ausgeblendet sein.
Hilfe....
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Hi Rose,
Is féidir leis an gcód VBA seo a leanas cabhrú leat.
Private Sub CheckBox1_Click()
[47:47].EntireRow.Hidden = Not CheckBox1
End Sub
Níl aon tráchtanna curtha suas anseo go fóill
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta

Lean orainn

Cóipcheart © 2009 - www.extendoffice.com. | Gach ceart ar cosaint. Cumhachtaithe ag ExtendOffice. | léarscáil an tSuímh
Is trádmharcanna nó trádmharcanna cláraithe de chuid Microsoft Corporation sna Stáit Aontaithe agus / nó i dtíortha eile iad lógó Office agus Office.
Cosanta ag Sectigo SSL