Gửi bởi
Po_Pikachu
Ẹc..Ẹc.. Sao em dùng cách cùi bắp đó mà có thấy gì hết đâu! Nó vẫn trơ ra đó.
Có 1 vài name rất cứng đầu... sau khi bạn chạy code lần 1 thì đã có 1 số name bị xóa, còn lại cho dù bạn xóa bằng tay nó vẩn trơ trơ!
Lúc ấy hãy tạm lưu và đóng file lại, mở ra lần nữa rồi chạy code!
Chú ý: Phải chạy trên từng sheet 1 vì có 1 số name thuộc loại cục bộ (name của sheet chứ không phải của Workbook), chỉ nhìn thấy khi chọn vào sheet tương ứng
Đóng và lưu file, rồi lại mở ra kiểm tra, làm chừng 3 lần sẽ xóa sạch các name
Code của tôi đơn giãn như sau:
Mã nguồn PHP:
Sub Test() Application.SendKeys "^{F3}" Application.SendKeys "{TAB}" Application.SendKeys "{UP}" For i = 1 To 500 Application.SendKeys "%d" Application.SendKeys "{UP}" Next Application.SendKeys "{ESC}"End Sub