Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
Sub PrintArea_Test03() 'Thiết lập vùng in tới dòng cuối
Sheet1.PageSetup.PrintArea = Sheet1.Range("B2", sheet1.Range("G" & rows.count).End(xlUp)).Address
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment