找出總和滿足條件的列?

找出總和滿足條件的列?

A 有一張包含資源和周數以及每週可用時間(小時)的表格。像這樣。

Resource 1225 1226 1227 ... 1252
.NET     30   30   15   ... 30
Java     40   40   40   ... 40

在另一個表中我有他的數據

Resource PlannedHours StartWeek EndWeek AvailableHours Diff ActualEndWeek
.NET     326          1225      1242    400            76   ?    
Java     100          1225      1242    400            300  ?

計畫時間來自時間項目/工單系統,開始和結束週手動輸入。可用時間和差異是根據第一個表格計算的。

除了我需要幫助的最後一欄之外,我已經解決了所有問題。當第一個表格中的可用資源加起來足以滿足計畫的時間時,如何找到一週。我需要該列並將該週放入“實際結束週”列中嗎?

答案1

Function LeastFactors(MyArray As Range, Goal As Double) As Integer
Dim RunningTotal As Double
Dim i As Integer

For i = 1 To MyArray.Count
    RunningTotal = RunningTotal + WorksheetFunction.Large(MyArray, i)
    If RunningTotal >= Goal Then
        LeastFactors = i
        Exit For
    Else
        LeastFactors = 0
    End If
Next i
End Function

use 將=LeastFactors(Sheet1!B2:B40,Sheet2!B2)告訴您需要幾週。如果找不到答案,它將返回零

相關內容