-
08-03-2012, 12:12 AM #1Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Lấy tên các sheet có chứa trong File
Click vào nút Shapes tự động liệt kê tên sheet vào cột B từ B2 trở đi, nếu đã lấy tên sheet rồi mà chạy tiếp Macro nó sẽ liệt kê tên sheet 1 lần nữa do đó để lấy tên sheet cho chính xác thì xóa dữ liệu trong vùng từ B2 trở xuống rồi chạy lại Macro.
Trong File tôi mới tạo liệt kê tên sheet, chưa có thời gian nên chưa bổ sung phần tạo link đến các sheet, trong File có Link là do làm tay, các bạn đừng thắc mắc tại sao File thấy có Link mà chạy Macro lại không thấy hiện Link. Trong File tôi không khóa Code.
Lưu ý:
Tên sheeet có tên LietKeTenSheet nếu muốn sửa lại tên thì nên gõ không dấu và Copy tên sheet và Paste thay thay LietKeTenSheet trong câu lệnh.
Set sh = ThisWorkbook.Sheets("LietKeTenSheet")
Thành:
Set sh = ThisWorkbook.Sheets("thaytensheet")View more random threads:
- Theo dõi ngạch bậc lương của cb-giáo viên
- Theo dõi thu học phí sinh viên
- Tách họ và tên
- Tạo một danh sách thả xuống trong cell bất kỳ
- Đưa bài lên dùm 1 bạn
- Cần hỗ trợ code VBA
- Lỗi khi sử dụng macro,addin
- Tặng các bạn ScrollText - Cuộn chữ: lên, xuống, trái phải,...
- Học VBA??
- MIDI Sound - Soạn nhạc trong Excel - Bài hát "Gọi đò"
Kể với bác sĩ, anh M. cho biết bữa qua là sinh nhật của mình nên có đi ăn tối, rồi trở về nhà quan hệ tình dục với vợ. Trong quá trình quan hệ , vợ anh dùng miệng "tác động" nhiều vào vùng tinh hoàn....
Hy hữu. Anh chàng suýt mất tinh hoàn vì chơi bằng miệng với vợ