T
Em tao mot button Print trong Execl
Em copy doan ma cua mot file khac
Sub One()
ActiveSheet.PageSetup.PrintArea = "$A$1:$D$14"
ActiveSheet.PageSetup.Orientation = xlLandscape
Sheets.PrintOut
End Sub
nhung khi gắn vào file của mình thì k thấy chạy mà báo lỗi Method 'PrintOut' of object 'Sheets' failed
Em đang bập bõm học VB nên chưa rõ lắm. Anh chị chỉ dùm em ạ
Em copy doan ma cua mot file khac
Sub One()
ActiveSheet.PageSetup.PrintArea = "$A$1:$D$14"
ActiveSheet.PageSetup.Orientation = xlLandscape
Sheets.PrintOut
End Sub
nhung khi gắn vào file của mình thì k thấy chạy mà báo lỗi Method 'PrintOut' of object 'Sheets' failed
Em đang bập bõm học VB nên chưa rõ lắm. Anh chị chỉ dùm em ạ