次の方法で共有


Resource.PayRates プロパティ (Project)

リソースのコスト単価表にある各種単価を表す PayRates コレクションを取得します。 読み取り専用 PayRates

構文

PayRates

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

注釈

リソース オブジェクトの場合は、 PayRates プロパティは、コスト単価表 A では、既定のテーブルの単価を返します。

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

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