ntung.licogi14
Thành viên mới

- Tham gia
- 20/5/19
- Bài viết
- 2
- Được thích
- 0
em chào anh chị, em muốn được trợ giúp về lỗi khi lập trình VBA, em là 1 member mới chưa rành về code. em có học theo 1 anh trên youtube về code in hàng loạt biên bản nghiệm thu, nhưng khi đến lệnh printout thì bị lỗi, anh chị có thể giúp em chỉ ra lỗi và cách khắc phục
Sub printF()
Dim i As Long, printFrom As Long, printTo As Long
printFrom = Sheet5.Range("i7").Value
printTo = Sheet5.Range("i9").Value
For i = printFrom To printTo
Sheet5.Range("I1").Value = i
Sheet5.PrintOut preview:=False
Next i
End Sub
Sub printF()
Dim i As Long, printFrom As Long, printTo As Long
printFrom = Sheet5.Range("i7").Value
printTo = Sheet5.Range("i9").Value
For i = printFrom To printTo
Sheet5.Range("I1").Value = i
Sheet5.PrintOut preview:=False
Next i
End Sub