Miten saan tuolle commandbutton1:lle määriteltyä makron joka aktivoi sen kun esim. solussa A1 on arvo 10?
CommandButton1.enable = True, kun tietyn solun arvo 10
hädässä
3151
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 3
Vanhimmat
Private Sub CommandButton1_Click()
If Cells(1, 1).Value = 10 Then
CommandButton1.Enabled = True
End If
End Sub
Siis ei laiteta tuota koodia sen CommandButtonin komentoon. Vaan esim.
Private Sub Worksheet_Activate()
End Sub
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
On Error Resume Next
Application.EnableEvents = False
If (Target.Address = "$A$1") And (Target.Value = 10) Then CommandButton1.enable = True
End If
Application.EnableEvents = True
End Sub