みなさま、いつも参考にさせてもらっています。 インプットされた日付をもとにstart日とend日をだして 日付がその間にある文書をｺﾚｸｼｮﾝとして取得したいと思ってます。 そこでdateRangeをだして、それをkeyにビューから getalldocumentsbykeyで取得しようと思ったのですが、 文書が取得できません。 以下抜粋---------------------------------------------- Dim ss As New NotesSession Dim dateTime1 As New NotesDateTime(Cdat(TStart)) Dim dateTime2 As New NotesDateTime(Cdat(TEnd)) Dim dateRange As NotesDateRange Set dateRange = ss.CreateDateRange() Set dateRange.StartDateTime = dateTime1 Set dateRange.EndDateTime = dateTime2 Set col = wkView.GetAllDocumentsByKey(dateRange,True) ------------------------------------------------------- ヘルプには以下のように書かれていたのでkeyに使えると思っていたんですがだめなのでしょうか？ (ヘルプ抜粋）-------------------------------------- String 型 (可変長のみ)、Integer 型、Long 型、single 型、または double 型の値、あるいは String 型の配列、number か DateTime か DateRange 型のオブジェクトです。 --------------------------------------------------- ちなみに、ビューは2列目に日付のﾌｨｰﾙﾄﾞでソートがかけてあります。 どなたかお分かりの方教えていただけませんでしょうか？ よろしくお願いします。