In hàng loạt có điều kiện trong Excel

[andyhop]

Mọi người cho mình hỏi
Mình có làm 1 file excel về viết và in nhật ký thi công.
mình đã viết VBA để in hàng loạt (chọn khoảng thời gian in) nhưng nó in hết toàn bộ ngày trong khoảng thời gian mình yêu cầu.
mình đang muốn là VBA chỉ cho in ngày có thi công, ngày trống thì ko in
Tks mọi người (Có file đính kèm)

 

[befaint]

Thế là ka ô đê xê rồi.

View attachment 262811

Bạn nên bảo người ta cái mục pa-ra-leo pơ-ro-gơ-ram-ming ở đây có người chỉ dẫn rồi. Chịu khó tìm. Nếu khong biết cách tìm thì dẹp cái tư tưởng ấy đi và đừng thử. Bởi vì chỉ có thế mà không tìm được là chưa đủ trình độ để rớ vảo.

Cái của thớt không tới mức vậy anh. Chỉ là sắp xếp 2 công việc riêng sao cho hợp lý (cái nào trước, cái nào sau) là được.

Thớt dùng từ (chạy 2 cùng 1 lúc) cũng chỉ là ý tưởng ý nghĩ vậy thôi, chứ đâu có hiểu bản chất kỹ thuật như thế nào.

Mấy cái chạy song song, cùng lúc thì lập trình cho phần cứng mới thấy hấp dẫn.

 

[VetMini]

...
Bạn viết được macro mà hỏi câu này thấy lạ lạ. Sao có thể chạy cùng 1 lúc được. Kể cả 1 sub của bạn. Nó cũng làm lần lượt theo code bạn viết mà.
...

Chạy song song hai công việc được chứ sao không. Vấn đề là để làm gì thôi.

Hai đoạn code có thể cùng tham chiếu đến một trị, ví dụ là ô A1
code A thấy A1 là 10, làm gì đó và sửa nó thành 15
nếu B chạy sau A thì sẽ thấy A1 nó là 15
Bây giờ người ta muốn 2 thằng chạy đua nhau, thằng nào tới trước thì thấy 10, thằng tới sau thì thấy 15. Suy nghĩ rất lô gic. Chuyện hai thằng có cuối cùng cho ra kết quả mong muốn hay không thì phải hỏi người có sáng kiến ấy.

Bởi vậy toi mới bảo đi tìm bài nói về cái này. Và hỏi chuyên gia viết bài ấy về trường hợp "ưu tiên". Ví dụ dẫu B tới trước thì vẫn bắt nó phải đợi A.

Cái của thớt không tới mức vậy anh. Chỉ là sắp xếp 2 công việc riêng sao cho hợp lý (cái nào trước, cái nào sau) là được.

Thớt dùng từ (chạy 2 cùng 1 lúc) cũng chỉ là ý tưởng ý nghĩ vậy thôi, chứ đâu có hiểu bản chất kỹ thuật như thế nào.

Mấy cái chạy song song, cùng lúc thì lập trình cho phần cứng mới thấy hấp dẫn.

Thì tôi có dặn bạn là bảo thớt nếu nhắm không đủ trình thì tự biết phận mà quên đi.

 

[BuiQuangThuan]

Chạy song song hai công việc được chứ sao không.

Cái này là thiệt hả chú. Trước giờ cháu cứ nghĩ là nó sẽ làm lần lượt giống như mình nhấn F8. Nó sẽ đi từng dòng lệnh 1. Nếu chú nói là được. Cháu xin lỗi chủ thớt và phê bình bản thân. Sẽ tìm hiểu thêm

 

[andyhop]

Sub IN_NHAT_KY()
    Dim i As Long, printFrom As Long, printTo As Long, Rng As Range
    With Sheet15
        printFrom = .Range("l5").Value
        printTo = .Range("l6").Value
        For i = printFrom To printTo
            .Rows("18:43").EntireRow.Hidden = False
            .Range("j10").Value = i
            If .Range("c10") <> "" Then
                For Each Rng In .Range("B18:B43")
                    If Rng.Value = Empty Then
                        Rng.EntireRow.Hidden = True
                    End If
                Next
                .PrintPreview
            End If
        Next i
        .Range("J10").FormulaR1C1 = "=RC[3]"
    End With
   
End Sub

Bạn thử thay đoạn sub này bằng cho modul1 coi
và modul10 thì xóa dòng call andong đi xem có đúng ý không

Bài đã được tự động gộp: 22/7/21

Bạn viết được macro mà hỏi câu này thấy lạ lạ. Sao có thể chạy cùng 1 lúc được. Kể cả 1 sub của bạn. Nó cũng làm lần lượt theo code bạn viết mà.
Nói đơn giản. Nếu bạn paste dữ liệu vào ô nào đó xong bôi màu chính ô đó xảy ra cùng lúc thì câu bạn hỏi mới trả lời được

Tks bạn, mình làm được rồi.
mình có thay đoạn ".PrintPreview" bằng ".PrintOut preview:=Flase" là in ra được, vì để ".PrintPreview" nó chỉ ra Preview chứ ko có in ra lun