Assignment.Overallocated プロパティ (Project)

割 り当てが割り当て超過の場合は True。 読み取り専用の Boolean です。

構文

式。 Overallocated

式Assignment オブジェクトを表す変数。

例

次の使用例は、作業中のプロジェクトのすべてのリソースの中で、割り当て超過であるリソースが占める割合を表示します。

Sub DisplayOverallocatedPercentage() 
 
 Dim R As Resource ' Resource object used in For Each loop 
 Dim NOverallocated As Long ' Number of overallocated resources 
 
 For Each R In ActiveProject.Resources 
 If R.Overallocated Then NOverallocated = NOverallocated + 1 
 Next R 
 
 MsgBox (Str$((NOverallocated / ActiveProject.Resources.Count) * 100) _ 
 & " percent (" & Str$(NOverallocated) & "/" & Str$(ActiveProject.Resources.Count) _ 
 & ")" & " of the resources in this project are overallocated.") 
 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。