Viết code cho sheet

Chia sẻ bởi:hands

★★★★★

‹ Làm sao đóng được cửa sổ VBA... Lọc dữ liệu theo khoảng thời gian... ›

Quảng cáo

Em tạo một macro tạo ra các sheet kết quả. Em muốn macro gắn cho các sheet này các đoạn code (code viết cho sheet). Vậy phải làm sao ạ.
Nếu như ban đầu đã có sheet kết quả rồi thì chỉ việc viết code trên sheet kết quả ấy.
Vấn đề là ban đầu chưa có sheet kết quả. Sau khi chạy macro mới ra các sheet kết quả. Em muốn macro tự động viết code cho các sheet kết quả này (các sự kiện cho sheet kết quả như click vào cell thì tô màu cell đó trên sheet kết quả chả hạn…)

theo mình hiểu là sau khi inser sheet vào(bằng code), bạn muốn sheet đó có chứa đoạn code để chạy các event phải ko?
mình ko bit có cách nào ko, nhưng mình nghĩ bạn có thể tao sẳn trên và để nó trên "thisworkbook", chẳng hạn như vậy

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

On Error Resume Next
If ActiveSheet.Name = "ketqua" Then
MsgBox "hello, iam here"
End If
On Error GoTo 0
End Sub