-
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:
- Xử lý giúp Lỗi 40040 trong Excel 2003
- Chương trình phá password Excel đây!
- Giúp đỡ viết code trong excel
- Tính tổng có nhiều điều kiện
- Chương trình theo dõi Văn bản, giấy mời, hồ sơ thẩm định Bồi thường.
- CÁCH TẠO 1FORM ĐỂ NHẬP
- Dùng hàm cơ sở dữ liệu để thống kê nhân sự theo độ tuổi, thâm niên & học vấn (hỗ trợ bỡi VBA)
- Lọc dữ liệu vào phiếu thu, phiếu chi
- Chơi games = excel
- Đưa bài lên dùm 1 bạn
Epson - một trong những tập đoàn công nghệ hàng đầu thế giới, đã khẳng định vị thế tiên phong của mình trong lĩnh vực máy chiếu. Với bề dày lịch sử và sự đổi mới không ngừng, Epson không chỉ mang đến...
Lịch sử hình thành và phát triển của thương hiệu máy chiếu Epson