次の方法で共有


Resource.CostRateTables プロパティ (Project)

リソースのコスト単価表を表す CostRateTables コレクションを取得します。 読み取り専用 CostRateTables

構文

CostRateTables

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

次の使用例は、アクティブ セルのリソースに設定されているすべてのコスト単価表の標準単価の一覧を表示します。

Sub ListPayRates() 
 Dim CRT As CostRateTable, PR As PayRate 
 Dim Rates As String 
 
 For Each CRT In ActiveCell.Resource.CostRateTables 
 For Each PR In CRT.PayRates 
 Rates = Rates & "CostRateTable " & CRT.Name & ": " & _ 
 PR.StandardRate & " (Effective " & PR.EffectiveDate & _ 
 ")" & vbCrLf 
 Next PR 
 Next CRT 
 
 MsgBox Rates 
 
End Sub

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

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