Gitiho contest
Cùng gitiho contest chinh phục kiến thức, khẳng định bản thân với hệ thống bài test phong phú, đầy đủ các chủ đề để bạn khám phá.
Gitiho for leading business
Tối ưu và đơn giản hóa hoạt động đào tạo tại doanh nghiệp. Sẵn sàng nền tảng, nội dung đào tạo cho tất cả các vị trí, bộ phận. Ứng dụng MIỄN PHÍ ngay vào doanh nghiệp chỉ với MỘT click.
Đã được tin tưởng sử dụng bởi các doanh nghiệp
Sub KeKhung_Dongcuoi() Dim Dongcuoi As Long Dongcuoi = Sheets("Week36")Range("A" &
Sub KeKhung_Dongcuoi()
Dim Dongcuoi As Long
Dongcuoi = Sheets("Week36").Range("A" & Rows.Count).End(xlUp).Row
With Range("A7:I" & Dongcuoi).Borders
0 .LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlMedium
End With
End Sub
Em chào thầy !! Em đang có đoạn code kẻ khung như trên ở sheet " Week36" và đã assign macro vào 1 nút. Bây giờ em muốn tạo lệnh copy " Week36" sang sheet khác và đặt tên là " Week37". Em phải viết đoạn code trên như thế nào để khi qua "week37" em vẫn sử dụng được nút mà em đã tạo ở "Week36"
Em cảm ơn thầy !!
1 câu trả lời
202 lượt xem
vỗ tay
Chào bạn không được bạn nhé do dòng cuối các vùng là khác nhau nên sẽ không sử dụng được như vậy bạn nhé.
vỗ tay
Câu hỏi liên quan
Top
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông