ให้ซ่อนและโชว์ ปุ่ม button ตามเงื่อนไข
Posted: Wed Mar 23, 2022 3:02 pm
สวัสดีครับ
ผมอยากให้ button แสดง และ ไม่แสดงตามเงื่อนไขครับ
เช่น เมื่อเซล a1 ไม่ว่างให้ โชวปุ่มออกมา
ถ้าว่างไม่โชวปุ่ม
ผมได้ลองทำ เกิด error ไม่สามารถแก้ได้ครับ
error จะชี้ไปที่
และไฮไลทสีเหลือง ที่
ผมอยากให้ button แสดง และ ไม่แสดงตามเงื่อนไขครับ
เช่น เมื่อเซล a1 ไม่ว่างให้ โชวปุ่มออกมา
ถ้าว่างไม่โชวปุ่ม
ผมได้ลองทำ เกิด error ไม่สามารถแก้ได้ครับ
Code: Select all
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Cells(1, 1).Value <> "" Then
Me.CommandButton1.Visible = True
Else
Me.CommandButton1.Visible = False
End If
Application.ScreenUpdating = True
End SubCode: Select all
.CommandButton1และไฮไลทสีเหลือง ที่
Code: Select all
Private Sub Worksheet_Change(ByVal Target As Range)