caokhai910
Thành viên mới
- Tham gia
- 6/5/20
- Bài viết
- 5
- Được thích
- 0
Mình muốn hỏi mình muốn thực hiện In_PDF hàng loạt và ẩn hàng những giá trị không đúng.
Nhưng khi thực hiện ẩn hàng thì chỉ được file đầu tiên còn các file thứ tự còn lại không thay đổi.
Các bạn cho xin ý kiến có cách nào ghép xử lý 2 việc này cùng 1 lúc được không ạ
Mình cảm ơn
Code cụ thẻ của mình như sau:
Sub IN_MBO()
Dim i As Long, printFrom As Long, printTo As Long
printFrom = Sheet9.Range("t3").Value
printTo = Sheet9.Range("t4").Value
For i = printFrom To printTo
Sheet9.Range("t2").Value = i
Sheet9.PrintOut Preview:=False
Next i
End Sub
Sub an_hang()
For i = 8 To 14
If Worksheets("MBO").Cells(i, 1).Value = "x" Then
Worksheets("MBO").Rows(i).Hidden = True
End If
Next
End Sub
Nhưng khi thực hiện ẩn hàng thì chỉ được file đầu tiên còn các file thứ tự còn lại không thay đổi.
Các bạn cho xin ý kiến có cách nào ghép xử lý 2 việc này cùng 1 lúc được không ạ
Mình cảm ơn
Code cụ thẻ của mình như sau:
Sub IN_MBO()
Dim i As Long, printFrom As Long, printTo As Long
printFrom = Sheet9.Range("t3").Value
printTo = Sheet9.Range("t4").Value
For i = printFrom To printTo
Sheet9.Range("t2").Value = i
Sheet9.PrintOut Preview:=False
Next i
End Sub
Sub an_hang()
For i = 8 To 14
If Worksheets("MBO").Cells(i, 1).Value = "x" Then
Worksheets("MBO").Rows(i).Hidden = True
End If
Next
End Sub