Code để sử dụng Enable/Disable button (1 người xem)

[van80]

Chào các anh chị trên diễn đàn !
Giúp dùm mình cách viết code trong vba excel để sử dụng Enable/Disable button.
Cụ thể:
Trên 1 trang sheet mình tạo ra 4 button, khi mình nhấn button1 thì button2 và button3 ở trạng thái Disable (false). Khi mình nhấn button4 thì button2 và button3 ở trạng thái Enable (true) còn button1 ở trạng thái Disable (false).
Cám ơn các anh chị nhiều ! Thân chào !

 

[jack nt]

private sub button1_click()
button2.enabled = false
button3.enabled = false
end sub

private sub button4_click()
button1.enabled = false
button2.enabled = true
button2.enabled = true
end sub

p/s: không thấy nói đến việc bấm phím nào để trả lại enabled = true cho button1?

 

[van80]

private sub button1_click()
button2.enabled = false
button3.enabled = false
end sub

private sub button4_click()
button1.enabled = false
button2.enabled = true
button2.enabled = true
end sub

p/s: không thấy nói đến việc bấm phím nào để trả lại enabled = true cho button1?

Cho mình hỏi thêm: Khi trang sheet ở trạng thái hiện hành thì button1 là true những button còn lại là false thì mình viết code như thế nào ?

 

[jack nt]

sub sheet_activate()
button1.enabled = true
button2.enabled = false
button3.enabled = false
button4.enabled = false
end sub
p/s: nếu có quá nhiều button thì dùng for each obj in me.oleobjects

 

[van80]

sub sheet_activate()
button1.enabled = true
button2.enabled = false
button3.enabled = false
button4.enabled = false
end sub
p/s: nếu có quá nhiều button thì dùng for each obj in me.oleobjects

Đoạn code này mình sử dụng như thế nào ? Mình đặt ở đâu mới có tác dụng ?
Nhân đây bạn giúp dùm mình luôn code khi khởi động file excel thì trang sheet này mở ra trước.
Thân chào bạn !

 

[viehoai]

Đoạn code này mình sử dụng như thế nào ? Mình đặt ở đâu mới có tác dụng ?
Nhân đây bạn giúp dùm mình luôn code khi khởi động file excel thì trang sheet này mở ra trước.
Thân chào bạn !

Yêu cầu của bạn ở đâu thì đặt ở đó
Chằng phải yêu cầu của bạn:

Khi trang sheet ở trạng thái hiện hành thì button1 là true những button còn lại là false

 

[van80]

Yêu cầu của bạn ở đâu thì đặt ở đó
Chằng phải yêu cầu của bạn:

Khi trang sheet ở trạng thái hiện hành ( hiện diện trước mặt) thì đoạn code sau vẫn không có tác dụng, tất cả các button đều bình thường.
sub sheet_activate()
button1.enabled = true
button2.enabled = false
button3.enabled = false
button4.enabled = false
end sub

Vậy thì làm sao đây ?

 

[viehoai]

Khi trang sheet ở trạng thái hiện hành ( hiện diện trước mặt) thì đoạn code sau vẫn không có tác dụng, tất cả các button đều bình thường.
sub sheet_activate()
button1.enabled = true
button2.enabled = false
button3.enabled = false
button4.enabled = false
end sub
Vậy thì làm sao đây ?

Bạn xem đây đúng như ý bạn không
Mà nghĩ cũng lạ khi Activate sheet thì các nút khác ẩn, vậy nó có tác dụng làm gì nhỉ? Không hiểu ý bạn chăng?

 

[van80]

Bạn xem đây đúng như ý bạn không
Mà nghĩ cũng lạ khi Activate sheet thì các nút khác ẩn, vậy nó có tác dụng làm gì nhỉ? Không hiểu ý bạn chăng?

Cám ơn bạn nhiều!
Mình sử dụng Excel 2003, bạn làm excel 2007 máy tính mình không đọc được.