Days supply in excel - formula

[sasils]

Hi,

Need advise from the experts in this forum. Data is below

[TABLE="width: 774"]
<colgroup><col><col span="10"></colgroup><tbody>[TR]
[TD] [/TD]
[TD]W1[/TD]
[TD]W2[/TD]
[TD]W3[/TD]
[TD]W4[/TD]
[TD]W5[/TD]
[TD]W6[/TD]
[TD]W7[/TD]
[TD]W8[/TD]
[TD]W9[/TD]
[TD]W10[/TD]
[/TR]
[TR]
[TD]Forecast[/TD]
[TD="align: right"]10[/TD]
[TD="align: right"]20[/TD]
[TD="align: right"]20[/TD]
[TD="align: right"]10[/TD]
[TD="align: right"]10[/TD]
[TD="align: right"]20[/TD]
[TD="align: right"]10[/TD]
[TD="align: right"]20[/TD]
[TD="align: right"]10[/TD]
[TD="align: right"]10[/TD]
[/TR]
[TR]
[TD]Closing stock[/TD]
[TD="align: right"]40[/TD]
[TD="align: right"]20[/TD]
[TD="align: right"]40[/TD]
[TD="align: right"]20[/TD]
[TD="align: right"]20[/TD]
[TD="align: right"]20[/TD]
[TD="align: right"]10[/TD]
[TD="align: right"]40[/TD]
[TD="align: right"]10[/TD]
[TD="align: right"]10[/TD]
[/TR]
[TR]
[TD]Week supply[/TD]
[TD="align: right"]2[/TD]
[TD="align: right"]1[/TD]
[TD="align: right"]3[/TD]
[TD="align: right"]1.5[/TD]
[TD="align: right"]1[/TD]
[TD="align: right"]1.5[/TD]
[TD="align: right"]0.5[/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
</tbody>[/TABLE]

I would like to get a automatic calculation formulation for Week supply. For example. In Week 1 Week supply is 2 because of Week 1 closing stock can cover forecast for week 2 and week 3 (20+20) - 40 = 0, therefore it is 2.

However in Week 5 Week supply is 1.5 week because week 6 forecast is 10 and week 7 forecast is 20, closing stock in week 5 is 20, therefore week supply base on closing stock week 5 going forward is 1.5.

Hope this explains.

Cheers

Sasils

 

[kvsrinivasamurthy]

Does UDF will do.

 

[sasils]

Hi

Thank you, what is UDF?

Cheers.

 

[kvsrinivasamurthy]

UDF means user defined function. Function which we have to code. After coding it can be used like other function.

 

[sasils]

UDF means user defined function. Function which we have to code. After coding it can be used like other function.

Thank you, can you please help with the UDF coding?

Cheers.

 

[kvsrinivasamurthy]

Data is in A1:K3

Formula in B4 then drag across
=GetWeeks(B3,C$2:$K$2)

Code for UDF GetWeeks

Function GetWeeks(ClosingStock As Long, WeekRng As Range)


Dim T As Long


For T = 1 To WeekRng.Cells.Count


    If ClosingStock > WeekRng.Cells(1, T) Then
    GetWeeks = T
    ClosingStock = ClosingStock - WeekRng.Cells(1, T)
    
    ElseIf ClosingStock = WeekRng.Cells(1, T) Then
    GetWeeks = T
    Exit For
    
    Else
    GetWeeks = GetWeeks + Round(ClosingStock / WeekRng.Cells(1, T), 2)
    Exit For
    End If


Next T


End Function

Open tab Developer --> Visual Basic
IN VIsual Basic window

Insert --> Module

Now Paste the given code to module

Close the VB window

UDF is available in the function list like other functions.