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 kekhungdongcuoi()Dim dongcuoi As LongDongcuoi = Sheets(''Sheet2")Range("B"& RowsCount)end(xlUp)row
Sub kekhungdongcuoi()
Dim dongcuoi As Long
Dongcuoi = Sheets(''Sheet2").Range("B"& Rows.Count).end(xlUp).row
With Range("A2:E" & dongcuoi).Borders 'ke khung bao quanh
.LineStyle = xlContinuous
.ColorIndex = 0
.TintAndShade = 0
.Weight = xlThin
End With
End Sub
Cho mình hỏi như này là sai ở đâu mà không được vậy?
1 câu trả lời
206 lượt xem
vỗ tay
Chào bạn bạn đang muốn kẻ khung nguyên dòng cuối hay sao 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