Lỗi khi tạo 2 Command Button trong cùng 1 sheet. (1 người xem)

[quoccuong1201]

Mình tạo 2 Button trong cùng 1 sheet. Cả 2 Button này đều chạy bình thường (nếu chạy riêng lẻ), nhưng không hiểu sao khi Button 2 chạy thì nó lại làm tên của Button 1 thay đổi, chỉ đổi tên do mình gán thôi.
Nhờ các bạn giúp đỡ. Mình muốn mỗi button chạy độc lập và không làm ảnh hưởng đến cái kia.
Cảm ơn các bạn nhiều.
Các bạn xem file đính kèm.

 

[leonguyenz]

Nếu bạn nói chạy độc lập thì sửa lại code của CommandButton2:

Private Sub CommandButton2_Click()
Application.ScreenUpdating = False
Dim dl
Set dl = Range([H74], [H10000].End(3))
   If CommandButton[COLOR=#ff0000][B]2[/B][/COLOR].Caption = "SC1" Then
      dl.AutoFilter Field:=1, Criteria1:="3"
      CommandButton[COLOR=#ff0000][B]2[/B][/COLOR].Caption = "ALL"
   Else
    dl.AutoFilter Field:=1
    CommandButton[B][COLOR=#ff0000]2[/COLOR][/B].Caption = "SC1"
   End If
Application.ScreenUpdating = True
End Sub

 

[quoccuong1201]

Cảm ơn Mr.Bum! Mình copy mà quên sửa hết tên của Button2. Hihi!