Skip to main content
 

Conas cnaipe a chumasú nó a dhíchumasú bunaithe ar luach cille in Excel?

Údar: Xiaoyang Athraithe Deiridh: 2024-08-13

An t-alt seo, labhróidh mé faoi roinnt modhanna chun cnaipe a chumasú nó a dhíchumasú bunaithe ar luach cille i mbileog oibre Excel.

Dhá chnaipe a chumasú nó a dhíchumasú bunaithe ar dhá shonraí colún le cód VBA

Cnaipe a chumasú nó a dhíchumasú bunaithe ar dhá luach cille le cód VBA


Dhá chnaipe a chumasú nó a dhíchumasú bunaithe ar dhá shonraí colún le cód VBA

Mar shampla, tá dhá chnaipe ordaithe agam i mbileog oibre, má tá sonraí ag Colún A, tá an cnaipe1 cumasaithe, agus tá cnaipe 2 díchumasaithe; má tá sonraí i gColún C, tá an cnaipe 2 cumasaithe, agus tá cnaipe 1 díchumasaithe. Chun an tasc seo a réiteach, d’fhéadfadh an cód VBA seo a leanas cabhrú leat.

1. Cliceáil ar dheis ar an mbileog ina bhfuil na cnaipí, agus ansin roghnaigh Féach an cód ón roghchlár comhthéacs, féach an scáileán:

seat den eagarthóir cód VBA a oscailt in Excel

2. Sa an Microsoft Visual Basic d’Fheidhmchláir fuinneog, cóipeáil agus greamaigh an cód thíos sa mhodúl bán le do thoil:

Cód VBA: Cumasaigh nó díchumasaigh dhá chnaipe bunaithe ar dhá cholún:

Private Sub Worksheet_Change(ByVal Target As Range)
    CommandButton1.Enabled = False
    CommandButton2.Enabled = False
    If Application.WorksheetFunction.CountA(Range("C:C")) > 0 Then
        CommandButton2.Enabled = True
    End If
    If Application.WorksheetFunction.CountA(Range("A:A")) > 0 Then
        CommandButton1.Enabled = True
    End If
End Sub

seat scáileáin a thaispeánann conas an cód VBA a úsáid chun dhá chnaipe a dhíchumasú

nótaí: Sa chód thuas, Cnaipe Ordú1 agus Cnaipe Ordú2 an bhfuil ainmneacha na cnaipí, A: A. agus C: C. an bhfuil an dá cholún a úsáideann tú chun dhá chnaipe a chumasú nó a dhíchumasú, athraigh iad le do riachtanas le do thoil.

3. Ansin sábháil agus dún an fhuinneog cód, anois, gheobhaidh tú an toradh seo a leanas de réir mar a theastaíonn uait:

(1.) Má tá sonraí cineáil i gColún A, cumasaítear an cnaipe 1 agus tá cnaipe 2 díchumasaithe, féach an scáileán:

is féidir gabháil scáileáin a thaispeánann cnaipe amháin a úsáid agus ceann amháin a dhíchumasú bunaithe ar luach i gcolún A

(2.) Má tá sonraí cineáil i gColún C, cumasaítear an cnaipe 2 agus tá cnaipe 1 díchumasaithe, féach an scáileán:

is féidir gabháil scáileáin a thaispeánann cnaipe amháin a úsáid agus ceann amháin a dhíchumasú bunaithe ar luach i gcolún C

(3.) Tá sonraí ag Colún A agus Colún C araon, tá dhá chnaipe cumasaithe go léir, féach an scáileán:

is féidir gabháil scáileáin a thaispeánann an dá chnaipe a úsáid nuair a bhíonn sonraí ag colún A agus C

(4.) Tá dhá chnaipe go léir díchumasaithe mura bhfuil aon sonraí i gColún A agus i gColún C, féach an scáileán:

tá gabháil scáileáin a thaispeánann an dá chnaipe díchumasaithe nuair nach bhfuil aon sonraí i gcolún A agus C


Cnaipe a chumasú nó a dhíchumasú bunaithe ar dhá luach cille le cód VBA

Más mian leat cnaipe ordaithe a chumasú nó a dhíchumasú bunaithe ar dhá luach cille, mar shampla, nuair atá luach in A1 níos mó ná an luach i B1, cumasaítear an cnaipe, eile, tá an cnaipe díchumasaithe. Is féidir leis an gcód VBA seo a leanas fabhar a dhéanamh duit freisin.

1. Cliceáil ar dheis ar an mbileog ina bhfuil an cnaipe, agus ansin roghnaigh Féach an cód ón roghchlár comhthéacs, sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cóipeáil agus greamaigh an cód thíos sa mhodúl bán, féach an scáileán:

Cód VBA: Cumasaigh nó díchumasaigh cnaipe bunaithe ar dhá luach cille:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim TargetAdd As String
    Dim xTemp As Double
    On Error GoTo ExitSub
    TargetAdd = Target.Address
    CommandButton1.Enabled = False
    If (TargetAdd = Range("A1").Address) Or (TargetAdd = Range("B1").Address) Then
        If Range("A1") > Range("B1") Then
            CommandButton1.Enabled = True
        End If
    End If
ExitSub:
End Sub

seat scáileáin a thaispeánann conas an cód VBA a úsáid chun cnaipe a chumasú nó a dhíchumasú

nótaí: Sa chód thuas, A1 agus B1 is iad na luachanna cille a úsáideann tú, Cnaipe Comáin1 is ainm don chnaipe, athraigh iad go dtí do cheann féin.

2. Ansin sábháil agus dún an fhuinneog cód, anois, má tá luach na cille in A1 níos mó ná B1, cumasaítear an cnaipe, eile, má tá luach na cille in A1 níos lú ná B1, tá an cnaipe díchumasaithe, féach an scáileán:

seat a thaispeánann stádas difriúil cnaipe bunaithe ar luach cille


Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...


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á!