こんにちは 困ったときによく参考にさせてもらってます。 過去レスみたのですが、まだ解決してないものとかあって 同じような質問なのですが、どなたかご存知の方 ご教授いただけませんでしょうか? dateRangeをGetalldocumentsbykeyのkeyに使おうとしている のですが、collectionを返してくれません。 ヘルプも確認しましたが、dateRangeはkeyに使えそうですし。 ビューは1列目を降順でソートしてあります。 列は日付スタイルにしているし、フィールドも時刻/日付タイプです。 以下をやってみたのですが、collectionのCountが0なのです。 なにか見落としているのか・・・? Const TStart = "2009/12/01" Const TEnd = "2009/12/16" Sub Initialize Dim ss As New NotesSession Dim db As NotesDatabase Dim view As NotesView Dim col As NotesDocumentCollection Dim doc As NotesDocument 'ビューから対象期間文書のみコレクション Dim dateTime1 As New NotesDateTime(Cdat(TStart)) Dim dateTime2 As New NotesDateTime(Cdat(TEnd)) Dim dateRange As NotesDateRange Set db = ss.CurrentDatabase Set view = db.getview("colvBranch") Set dateRange = ss.CreateDateRange() Set dateRange.StartDateTime = dateTime1 Set dateRange.EndDateTime = dateTime2 Set col = view.GetAllDocumentsByKey(dateRange, False) Set doc = col.GetFirstDocument colcount = col.Count ・・・以下省略 End Sub よろしくお願いします。