Làm thế nào để chọn vùng (Bôi đen) bằng VBA

Liên hệ QC

hung2412

Thành viên tích cực
Tham gia
5/8/08
Bài viết
929
Được thích
240
Giới tính
Nam
Xin chào các bạn GPE!
Tôi có 1 vấn đề nhờ các bạn giúp cho. Tôi có 1 bảng Excel như sau:
1.png
Dữ liệu ở cột B không cố định dòng và dữ liệu ở giữa cột có thể không liên tục
Tôi dùng Code này mà không được, nó báo lỗi:

Mã:
Sub Chon_dong_cuoi()
Dim Dongcuoi As Long

Dongcuoi = [B65536].End(xlUp).Row

Range([B3], [B"& Dongcuoi &"]).Select
End Sub
Sửa cái Code Range([B3], [B"& Dongcuoi &"]).Select này như thế nào để cho chạy được nhỉ?
Mong các bạn chỉ giáo!
 

File đính kèm

  • Chon dong cuoi.xlsm
    16.8 KB · Đọc: 3
Sửa cái Code Range([B3], [B"& Dongcuoi &"]).Select này như thế nào để cho chạy được nhỉ?
Mong các bạn chỉ giáo!
Thu cái này coi nào
Anh này người quen quen sao ấy nhỉ
Mã:
Sub Chon_dong_cuoi()
Dim Dongcuoi As Long
With Sheet1
    Dongcuoi = .Range("B" & Rows.Count).End(xlUp).Row
    .Range("B3:B" & Dongcuoi).Select
End With
End Sub
 
Upvote 1
Web KT

Bài viết mới nhất

Back
Top Bottom