次の方法で共有


Application.DurationValue メソッド (Project)

期間を分単位で返します。

構文

DurationValue( _Duration_ )

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

パラメーター

名前 必須 / オプション データ型 説明
Duration 必須 String 分単位で示す期間を指定します。

戻り値

バリアント型

次の使用例は、選択されたタスクの期間に、入力された値を追加して期間を延長します。

Sub DurationAdder() 
 
 Dim Temp As String 
 
 Temp = InputBox$("Enter amount by which to increase the duration:") 
 ActiveCell.Task.Duration = ActiveCell.Task.Duration + DurationValue(Temp) 
 
End Sub

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

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