Tính khoảng cách giữa các lần thanh toán liên tiếp trong tháng (1 người xem)

[lehuong1409]

E có một bảng như file đính kèm, hiện tại e phải tính khoảng cách giữa 2 ngày thanh toán liên tiếp xem cách nhau bao nhiêu ngày. Mong các bác giúp đỡ

 

[leonguyenz]

E có một bảng như file đính kèm, hiện tại e phải tính khoảng cách giữa 2 ngày thanh toán liên tiếp xem cách nhau bao nhiêu ngày. Mong các bác giúp đỡ

Bạn đặt 1 Name, Vt:

=IF(Sheet1!$C$3:$C$20<>"",ROW(Sheet1!$C$3:$C$20),"")

Công thức tại D3:

=IF(C3>0,INDIRECT("A"&SMALL(Vt,COUNT($C$2:C3)))-INDIRECT("A"&SMALL(Vt,COUNT($C$2:C3)-1)),"")

Gõ số 0 tại C3 để xác định ngày ghi nợ đầu tiên.

 

[nginh]

e có một bảng như file đính kèm, hiện tại e phải tính khoảng cách giữa 2 ngày thanh toán liên tiếp xem cách nhau bao nhiêu ngày. Mong các bác giúp đỡ

=index(a:a,small(if(c$4:c$20<>"",row(c$4:c$20)),row(2:2)))-index(a:a,small(if(c$3:c$19<>"",row(c$3:c$19)),row(1:1)))

 

[lehuong1409]

Bạn đặt 1 Name, Vt:

=IF(Sheet1!$C$3:$C$20<>"",ROW(Sheet1!$C$3:$C$20),"")

Công thức tại D3:

=IF(C3>0,INDIRECT("A"&SMALL(Vt,COUNT($C$2:C3)))-INDIRECT("A"&SMALL(Vt,COUNT($C$2:C3)-1)),"")

Gõ số 0 tại C3 để xác định ngày ghi nợ đầu tiên.

Có cách nào khác ngoài đặt Name không bác, e tính dùng hàm mảng mà mãi k ra

 

[lehuong1409]

=index(a:a,small(if(c$4:c$20<>"",row(c$4:c$20)),row(2:2)))-index(a:a,small(if(c$3:c$19<>"",row(c$3:c$19)),row(1:1)))

E muốn trả về kết quả khoảng cách giữa 2 lần thanh toán đó tại dòng thanh toán luôn giống như bài của Mr Bum. Bác có cao kiến gì không ạ?

 

[leonguyenz]

Có cách nào khác ngoài đặt Name không bác, e tính dùng hàm mảng mà mãi k ra

Bạn Coppy công thức trong Name thay cho Vt là được mà, D3:

=IF(C3>0,INDIRECT("A"&SMALL(IF(Sheet1!$C$3:$C$20<>"",ROW(Sheet1!$C$3:$C$20),""),COUNT($C$2:C3)))-INDIRECT("A"&SMALL(IF(Sheet1!$C$3:$C$20<>"",ROW(Sheet1!$C$3:$C$20),""),COUNT($C$2:C3)-1)),"")

Ctrl+Shift+Enter.

 

[nginh]

E muốn trả về kết quả khoảng cách giữa 2 lần thanh toán đó tại dòng thanh toán luôn giống như bài của Mr Bum. Bác có cao kiến gì không ạ?

D3=IF(COUNT(C$3:C3)>1,IF(C3<>"",INDEX(A:A,SMALL(IF(C$3:C$20<>"",ROW(C$3:C$20)),COUNT(C$3:C3)))-INDEX(A:A,SMALL(IF(C$3:C$20<>"",ROW(C$3:C$20)),COUNT(C$3:C3)-1)),""),"")

Ctrl+Shift+Enter

 

[lehuong1409]

Bạn Coppy công thức trong Name thay cho Vt là được mà, D3:

=IF(C3>0,INDIRECT("A"&SMALL(IF(Sheet1!$C$3:$C$20<>"",ROW(Sheet1!$C$3:$C$20),""),COUNT($C$2:C3)))-INDIRECT("A"&SMALL(IF(Sheet1!$C$3:$C$20<>"",ROW(Sheet1!$C$3:$C$20),""),COUNT($C$2:C3)-1)),"")

Ctrl+Shift+Enter.

E cũng vừa thử như thế xong thì đọc được reply của bác, e sẽ nghiên cứu thêm ạ. Cảm ơn bác

 

[Phuocam]

E muốn trả về kết quả khoảng cách giữa 2 lần thanh toán đó tại dòng thanh toán luôn giống như bài của Mr Bum. Bác có cao kiến gì không ạ?

Thử công thức này [D4]:
=IF(C4="","",A4-LOOKUP(2,1/($C$3:C3<>""),$A$3:A3))

 

[lehuong1409]

Thử công thức này [D4]:
=IF(C4="","",A4-LOOKUP(2,1/($C$3:C3<>""),$A$3:A3))[/QUOTE
Công thức của bác ngắn gọn quá, cảm ơn bác

 

[lehuong1409]

em không biết tạo tên đề tài mới là gì nên e lại vào đây nhờ vả các bác tí.
em có một nhà cung cấp nhưng với mỗi hợp đồng lại có một thời hạn thanh toán khác nhau nhưng chuyển trả tiền thì lại không theo số tiền trên hoá đơn nên em phải theo dõi thủ công hoá đơn đó hoàn tất thanh toán vào ngày nào? từ đó tính ra số ngày thanh toán của từng hoá đơn. Bác nào có cách xử lý nào nhanh hơn chỉ giáo em với ạ

 

[comet_1701]

em không biết tạo tên đề tài mới là gì nên e lại vào đây nhờ vả các bác tí.
em có một nhà cung cấp nhưng với mỗi hợp đồng lại có một thời hạn thanh toán khác nhau nhưng chuyển trả tiền thì lại không theo số tiền trên hoá đơn nên em phải theo dõi thủ công hoá đơn đó hoàn tất thanh toán vào ngày nào? từ đó tính ra số ngày thanh toán của từng hoá đơn. Bác nào có cách xử lý nào nhanh hơn chỉ giáo em với ạ

Sub Thanhtoan()
Dim Sarr, Arr, i As Long, k As Long
With Sheet1
    Sarr = .Range(.[A6], .[A65000].End(xlUp)).Resize(, 7).Value2
End With
ReDim Arr(1 To UBound(Sarr), 1 To 1)
For i = 1 To UBound(Sarr)
    If InStr(Sarr(i, 4), "Thanh toán") Then
        k = k + 1
        Arr(k, 1) = Sarr(i, 1)
    End If
Next i
    [G6:G1000].ClearContents
    [G6].Resize(k, 1).Value = Arr


End Sub

Bạn dùng tạm sub này

 

[lehuong1409]

em vẫn đang lọ mọ học VBA nên nhiều cái em chưa hiểu lắm. Nhân tiện cho em hỏi bác có hàm nào có thể sử dụng đc cho trường hợp này k ạ, k hiểu vì lý do gì e cứ mò vào VBA là mấy cái file excel của e cứ chạy như con rùa ý