Bạn kiểm tra xem đã thiết lập Enable macro chưa? Nếu chưa thì bạn click tab File/Option/Trust Center rồi bấm chọn như trong hình:
Bấm Ok, rồi nhấn tổ hợp phím ALT+F11 để vào cửa sổ VB, bấm chuột phải vào Project1, Insert/Module, rồi dán đoạn code vô:
Option Explicit
Sub CopyToExcel()
Dim...