次の方法で共有

Resource.Overallocated プロパティ (Project)

  • [アーティクル]

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

構文

式。 Overallocated

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

注釈

[割り当て超過] プロパティでは、数量単価型リソースの具体的な情報は返されません。

例

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

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 のサポートおよびフィードバックを参照してください。