Câu lệnh đặt vùng in trong VBA

[Bogia_hp7]

Xin hỏi cả nhà câu lệnh đặt vùng in trong VBA. Giả sử tôi có vùng chọn :
Range(Cells(1, 1), Cells(i, 6)), làm thế nào để lấy vùng chọn này làm vùng in ( PrintArea)?

 

[PhanTuHuong]

Bạn xem trong mục này:

http://www.giaiphapexcel.com/forum/showthread.php?t=888&page=2

Chú ý post đúng Topic

 

[Bogia_hp7]

Trước tiên cám ơn bạn đã hướng dẫn.
Tuy nhiên ý tôi ko phải là đặt vùng in cho một vùng cố định. Vùng in tôi định đặt là một vùng động ( trong Ranger của tôi có tham số i tuỳ ý thay đổi theo từng bài toán ).
Mong bạn hướng dẫn!

 

[tedaynui]

Trước tiên cám ơn bạn đã hướng dẫn.
Tuy nhiên ý tôi ko phải là đặt vùng in cho một vùng cố định. Vùng in tôi định đặt là một vùng động ( trong Ranger của tôi có tham số i tuỳ ý thay đổi theo từng bài toán ).
Mong bạn hướng dẫn!

Chào bạn
Có phải ý của bạn thế này không ?

ActiveSheet.PageSetup.PrintArea = "$C$" & i & ":$E$" & i + 20

TDN

 

[Bogia_hp7]

Chà đúng ý tôi rồi, cảm ơn bạn đã giúp đỡ!