Resources オブジェクト (Project)

Resource オブジェクトのコレクションを格納します。

例

Resources コレクションの使い方

リソース (index) を使用して、index はリソース インデックス番号またはリソース名を使用して、1 つの Resource オブジェクトを返します。 次の例では、作業中のプロジェクトのすべてのリソースの名前が一覧表示されます。

Dim R As Long, Names As String 

 

For R = 1 To ActiveProject.Resources.Count 

 Names = ActiveProject.Resources(R).Name & ", " & Names 

Next R 

 

Names = Left$(Names, Len(Names) - Len(ListSeparator & " ")) 

MsgBox Names

Resources コレクションの使い方

リソース プロパティを使用して、 リソース のコレクションを取得します。 次の例では、前の例と同じリストが生成されますは、 ActiveProject.Resourcesへのオブジェクト参照を設定し、 Rが使用されている ActiveProject.Resourcesを使用しています。

Dim R As Resources, Temp As Long, Names As String 

 

Set R = ActiveProject.Resources 

 

For Temp = 1 To R.Count 

 Names = R(Temp).Name & ", " & Names 

Next Temp 

 

Names = Left$(Names, Len(Names) - Len(ListSeparator & " ")) 

MsgBox Names

Resource オブジェクトを Resourcesコレクションに追加するには、 Add メソッドを使用します。 次の使用例は、作業中のプロジェクトに、Matilda という名前の新しいリソースを追加します。

ActiveProject.Resources.Add "Matilda"

メソッド

名前
Add

プロパティ

名前
アプリケーション
Count
アイテム
Parent
UniqueID

関連項目

Project オブジェクト モデル

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

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