Bạn có thể quản lý các sheet bởi một sheet điều khiển
Private Sub Control_Click()
Dim wsSheet As Worksheet
Dim ws As Worksheet
Dim Counter As Long
On Error Resume Next
Set wsSheet = Sheets("Control")
'Kiem tra su ton tai cua Sheet
On Error GoTo 0
If wsSheet Is...