Recipient.FreeBusy メソッド (Outlook)
Office VBA リファレンス トピック
docs.microsoft.com