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

Conas gach bosca seiceála a dhísheiceáil nó a dhí-roghnú ag an am céanna in Excel?

Conas a d’fhéadfá na boscaí seiceála go léir a sheiceáil nó a dhí-roghnú ag an am céanna i mbileog oibre mar a thaispeántar an pictiúr a leanas? San Airteagal seo, labhróidh mé faoi roinnt cóid thapa chun é a réiteach.

boscaí seiceála doc uncheck 1

Díthiceáil nó díroghnaigh gach bosca seiceála le cód VBA


mboilgeog cheart gorm saighead Díthiceáil nó díroghnaigh gach bosca seiceála le cód VBA

Díthiceáil nó díroghnaigh gach bosca seiceála seiceáilte (Rialuithe Foirme):

Más rialuithe foirme iad do bhosca seiceála, is féidir leat iad a dhísheiceáil ag an am céanna leis an gcód VBA seo a leanas:

1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Modúil Fuinneog.

Cód VBA: Díthiceáil nó díroghnaigh gach bosca seiceála seiceáilte (Rialuithe Foirme):

Sub ClearCheckBoxes()
'Updateby Extendoffice
    Dim chkBox As Excel.CheckBox
    Application.ScreenUpdating = False
    For Each chkBox In ActiveSheet.CheckBoxes
            chkBox.Value = xlOff
    Next chkBox
    Application.ScreenUpdating = True
End Sub

3. Ansin brúigh F5 eochair chun an cód seo a rith, agus dísheiceáladh gach bosca seiceála seiceáilte ag an am céanna sa bhileog oibre gníomhach.


Díthiceáil nó díroghnaigh gach bosca seiceála seiceáilte (Rialuithe ActiveX):

Más Rialuithe ActiveX iad na boscaí seiceála, cuir an cód VBA thíos i bhfeidhm:

1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Modúil Fuinneog.

Cód VBA: Díthiceáil nó díroghnaigh gach bosca seiceála seiceáilte (Rialuithe ActiveX):

Sub clearcheckbox()
'Updateby Extendoffcie
    Dim c As Object
    For Each c In ActiveSheet.OLEObjects
        If InStr(1, c.Name, "CheckBox") > 0 Then
            c.Object.Value = False
        End If
    Next
End Sub

3. Ansin brúigh F5 eochair chun an cód seo a rith, agus rinneadh gach bosca seiceála a dhí-roghnú ag an mbileog oibre gníomhach ag an am céanna.


Cuir boscaí seiceála iolracha isteach i roghnúcháin ag an am céanna

Kutools le haghaidh Excel's Boscaí Seiceála Iontrála Baisc is féidir le fóntais cabhrú leat ilbhoscaí a chur isteach go tapa ag an am céanna. Cliceáil chun Kutools a íoslódáil le haghaidh Excel!


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 (14)
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ú
go raibh míle maith agat as an gcód vba seo, chabhraigh sé go mór.

FYI do dhaoine nach bhfuil á fháil ag obair ach F5 a bhualadh, go simplí :

tab forbróra > Macraí > roghnaigh an modúl díreach cruthaithe agus cliceáil ar roghanna > clóscríobh carachtar don aicearra, mar shampla ctrl+j nó ctrl+k.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Go raibh maith agat as do chabhair le seo. Tá sé an-bhuíoch. Tabhair do d’aire, áfach: TÁ AN Litriú Mícheart INA gCÓD DO CHÉIM #2. Cód VBA: Díthiceáil nó díroghnaigh gach ticbhosca ticeála (Rialuithe ActiveX):
Fo-bhosca seiceála()
'Updateby Extendoffcie
Dim c Mar Réad
Do Gach c In ActiveSheet.OLEOobjects
Má tá InStr(1, c.Name, "CheckBox") > 0 Ansin
c.Object.Value = Bréagach
Deireadh Má
Ar Aghaidh
Fo Deireadh

TABHAIR FAOI DEARA LE DO THOIL NACH bhfuil AN Focal "Extendoffcie" litrithe i gceart. NÍ CHÓIR É A bheith"Extendoffice"?? Mar sin féin, theastaigh ach é sin a chur amach ann
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Cad a tharlóidh dá mbeinn ag iarraidh cnaipe a úsáid chun an macra a ghníomhachtú chun na boscaí a ghlanadh?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Ariel,
Chun cnaipe a úsáid chun an macra a ghníomhachtú, ar dtús, ba chóir duit cnaipe a chur isteach ón liosta anuas Cruthanna, agus ansin cliceáil ar dheis ar an gcnaipe, roghnaigh Assign Macro ón roghchlár comhthéacs, agus ansin roghnaigh an t-ainm macra sa bhosca dialóg Assign Macro . Ansin cliceáil OK, agus beidh an cód macra a nascadh leis an gcnaipe.
Bain triail as, le do thoil, tá súil gur féidir leis cabhrú leat!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Conas is féidir liom na boscaí i raon cille ar leith a dhíthiceáil ar an mbileog ghníomhach amháin? Tá 3 liostaí agam ar bhileog amháin (tascanna laethúla/seachtainiúla/míosúla) agus theastaigh uaim cnaipe “Clear All” a dhéanamh do gach liosta.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Cabhair mhór! go raibh maith agat!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
OMG Go raibh maith agat, IS SÁBHÁILTE SA LÁTHAIR SEO :)
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Merci beaucoup d'avoir partagé le code pour décocher des éléments "CheckBox", mar sin de mo stór ! :o)En effet, en codant un formulaire de saisie fait dans une feuille, je cherchais à trouver un moyen de décocher les cases (en guise de réinitialisation du formulaire) et je ne trouvais pas (à cuid avec la modh "Roghnaigh" qui est, comme nous le savons tous, à bannir), tout simplement car :=> la propriété".CheckBoxes" n'existe pas en proprieté d'une "Bileog Oibre" !=> l'Objet"CheckBoxes" ne figure pas non plus dans l'explorateur d'objets !C'est lunaire cette histoire...Alors merci énormément.Bien à vous.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Bonjour Lindas,
Tá tú ag prie. Heureux que cela aide. Doirt ceist toute, n'hésitez pas à nous contacter. Pas une bonne journée.
Le meas,
Mandy
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit,
beim öffnen der datei sollten zwei voneinander abhängige CheckBox1 u. CheckBox2 nicht aktiviert sein

Fobhosca Príobháideach 2_Cliceáil()
Má tá CheckBox2 = Fíor Ansin
CheckBox1 = Bréagach
Deireadh Má
Fo Deireadh
Fobhosca Príobháideach 1_Cliceáil()
Má tá CheckBox1 = Fíor Ansin
CheckBox2 = Bréagach
Deireadh Má
Fo Deireadh

Go raibh maith agat as do chabhair
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Siegfried
Más mian leat ceann amháin a sheiceáil agus ceann eile a dhíchumasú, cuir an cód thíos i bhfeidhm le do thoil:
nótaí: An ticbhosca anseo ba cheart duit an ticbhosca ActiveX Control a úsáid.
Private Sub CheckBox2_Click()
If CheckBox2 = True Then
CheckBox1.Enabled = False
Else
CheckBox1.Enabled = True
End If
End Sub
Private Sub CheckBox1_Click()
If CheckBox1 = True Then
CheckBox2.Enabled = False
Else
CheckBox2.Enabled = True
End If
End Sub

Bain triail as, le do thoil, tá súil gur féidir leis cabhrú leat!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Conas a ghlanadh na ticbhosca ar gach bileog oibre?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit, Ramon

Chun na ticbhoscaí ar fad a ghlanadh trasna na bileoige go léir, cuir na cóid thíos i bhfeidhm le do thoil:
Díthiceáil gach ticbhosca ó gach bileog (Rialuithe Foirme):
Sub Uncheckallcheckboxes()
    Dim sh As Worksheet
    For Each sh In Sheets
        On Error Resume Next
            sh.CheckBoxes.Value = False
        On Error GoTo 0
    Next sh
End Sub


Díthiceáil gach ticbhosca ó gach bileog (Rialuithe ActiveX):
Sub uncheck_all_ActiveX_checkboxes()
    Dim ws As Worksheet
    Dim xbox As OLEObject
    For Each ws In ThisWorkbook.Worksheets
        For Each xbox In ws.OLEObjects
            ws.OLEObjects(xbox.Name).Object.Value = False
        Next
    Next
End Sub


Bain triail as, le do thoil, tá súil gur féidir leis seo cabhrú leat!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Conas a ghlanfainn gach ticbhosca ar gach bileog oibre?
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