In hàng loạt trong excel (1 người xem)

[Phạm Ngọc Vân Anh]

Dear mn, em muốn in hđlđ hàng loạt bằng excel. Cơ sở dữ liệu e để trong file đính kèm. Mọi người giúp em với ạ. Hic

 

[saobekhonglac]

Dear mn, em muốn in hđlđ hàng loạt bằng excel. Cơ sở dữ liệu e để trong file đính kèm. Mọi người giúp em với ạ. Hic

Chọn máy in rồi sau đó in, mình đang đặt in từ số thứ tự 1 đến 124. Nếu bạn muốn in khác thì sửa lại code dòng bên dưới (lưu ý: in người thứ nhất thì T15 gõ = 0 (số thứ tự - 1).

For i = 1 To 124

 

[be_09]

Dear mn, em muốn in hđlđ hàng loạt bằng excel. Cơ sở dữ liệu e để trong file đính kèm. Mọi người giúp em với ạ. Hic

Góp ý cho bạn:
1/ Muốn in hợp đồng hàng loạt thì phải sử dụng VBA.
2/ Bạn ở KCN Tam Phước, Biên Hòa, Đồng Nai thì có thể gặp trực tiếp tôi uống Coffee tại AROBI gần chợ Tân Hiệp (đường 5 cũ) để được trợ giúp cụ thể hơn.
3/ Nếu thứ bảy hoặc chúa nhật thì có thể gặp gỡ thêm một số thành viên khác như: ndu, Lê Duy Thương, Ca Điền Tâm.

 

[nhamvantrieu]

Chọn máy in rồi sau đó in, mình đang đặt in từ số thứ tự 1 đến 124. Nếu bạn muốn in khác thì sửa lại code dòng bên dưới (lưu ý: in người thứ nhất thì T15 gõ = 0 (số thứ tự - 1).

For i = 1 To 124

anh ơi anh giúp cho em file này với em không biết VBA cop file của anh về sửa nhưng không chạy được

 

[be_09]

anh ơi anh giúp cho em file này với em không biết VBA cop file của anh về sửa nhưng không chạy được

Bạn không nên đăng bài ở nhiều nơi (có thể sẽ vi phạm nội quy), bài kia ở Link sau:
https://www.giaiphapexcel.com/diendan/threads/vba-in-hàng-loạt.140406/

 

[Phạm Ngọc Vân Anh]

Góp ý cho bạn:
1/ Muốn in hợp đồng hàng loạt thì phải sử dụng VBA.
2/ Bạn ở KCN Tam Phước, Biên Hòa, Đồng Nai thì có thể gặp trực tiếp tôi uống Coffee tại AROBI gần chợ Tân Hiệp (đường 5 cũ) để được trợ giúp cụ thể hơn.
3/ Nếu thứ bảy hoặc chúa nhật thì có thể gặp gỡ thêm một số thành viên khác như: ndu, Lê Duy Thương, Ca Điền Tâm.

Bài đã được tự động gộp: 24/1/19

Thanks bạn

 

[bibo2019]

Chọn máy in rồi sau đó in, mình đang đặt in từ số thứ tự 1 đến 124. Nếu bạn muốn in khác thì sửa lại code dòng bên dưới (lưu ý: in người thứ nhất thì T15 gõ = 0 (số thứ tự - 1).

For i = 1 To 124

Mình cũng có file giống như này mà muốn in từ số thứ tự bất kỳ đến số bất kỳ (ví dụ in từ STT 10 - 15) thì sửa lại code như nào vậy bạn?

 

[saobekhonglac]

Mình cũng có file giống như này mà muốn in từ số thứ tự bất kỳ đến số bất kỳ (ví dụ in từ STT 10 - 15) thì sửa lại code như nào vậy bạn?

Chỉnh chỗ For I - 1 To 2 thành 10 To 15

Sub InHD()
Dim Num As Long, i As Long
Num = Sheet8.[T15].Value
For i = 10 To 15
    Sheet8.[T15].Value = Num + i
    Sheet8.PrintOut
Next
End Sub

 

[bibo2019]

Chỉnh chỗ For I - 1 To 2 thành 10 To 15

Sub InHD()
Dim Num As Long, i As Long
Num = Sheet8.[T15].Value
For i = 10 To 15
    Sheet8.[T15].Value = Num + i
    Sheet8.PrintOut
Next
End Sub

>
=> Bạn ơi, có cách nào sửa code 1 lần để khi mình chọn khoảng in ngoài sheet như ảnh thì tự động in luôn thay vì phải sửa trực tiếp trên code không?

 

[saobekhonglac]

>View attachment 215888
=> Bạn ơi, có cách nào sửa code 1 lần để khi mình chọn khoảng in ngoài sheet như ảnh thì tự động in luôn thay vì phải sửa trực tiếp trên code không?

Bạn sữa lại thành

For i = Sheet8.[T16].Value To Sheet8.[T17].Value

T15 để chạy số tự đồng theo nhân viên nên k sử dụng được, bạn sửa lại T16 và 17 để in nha

 

[bibo2019]

Bạn sữa lại thành

For i = Sheet8.[T16].Value To Sheet8.[T17].Value

T15 để chạy số tự đồng theo nhân viên nên k sử dụng được, bạn sửa lại T16 và 17 để in nha

Mình không hiểu về VBA lắm, bạn có thể sửa lại toàn bộ đoạn code đó cho mình không? Với lại trong trường hợp mà T15>STT của nhân viên thì mình thấy máy in vẫn chạy, ko hiểu có lỗi gì nhỉ? Bạn giúp mình với nhé, xin cảm ơn rất nhiều!

 

[saobekhonglac]

Mình không hiểu về VBA lắm, bạn có thể sửa lại toàn bộ đoạn code đó cho mình không? Với lại trong trường hợp mà T15>STT của nhân viên thì mình thấy máy in vẫn chạy, ko hiểu có lỗi gì nhỉ? Bạn giúp mình với nhé, xin cảm ơn rất nhiều!

Bạn xem file đính kèm.

 

[bibo2019]

Bạn xem file đính kèm.

Mình đã sửa được rồi, cảm ơn bạn rất nhiều!

 

[Tuyết Chinh VP]

Mình muốn in như này nhưng nó là ủy quyền quyết toán thuế.

Bài đã được tự động gộp: 24/4/19

Góp ý cho bạn:
1/ Muốn in hợp đồng hàng loạt thì phải sử dụng VBA.
2/ Bạn ở KCN Tam Phước, Biên Hòa, Đồng Nai thì có thể gặp trực tiếp tôi uống Coffee tại AROBI gần chợ Tân Hiệp (đường 5 cũ) để được trợ giúp cụ thể hơn.
3/ Nếu thứ bảy hoặc chúa nhật thì có thể gặp gỡ thêm một số thành viên khác như: ndu, Lê Duy Thương, Ca Điền Tâm.

Thế ở Hải Dương thì gặp ai ạ?

 

[caocuongbkdn]

Mình muốn in hàng loạt biên bản nghiệm thu và checklist :
khi mình bấm in.
- mình sẽ in hàng loạt từ biên bản số 1 đến biên bản số n theo cột số thứ tự. - và khi nó in hạng mục số 1 (màu xanh, có liên kết với các sheet khác rồi), thì nó sẽ tự động in các sheet liên quan tại cột "SHeet cần in". ví dụ: in số 1: thì nó sẽ tự động in sheet số 5, 6 và 8 (5/6/8). khi nhảy qua in số 2 thì nó sẽ in các sheet số : 5,6 và 10(5/6/10) và tương tự cho các số tiếp theo.
Nhờ các bạn hỗ trợ!