Skip to main content

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

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:

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

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:

(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:

(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:

(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:


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

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:

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 ...

Tuairisc


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á!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I receive a "Expected Function or variable" error when I incorporate this code - could you show the code you set up for the two buttons? May help me solve the error.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations