Recipient.FreeBusy-Methode (Outlook)

Artikel
04/07/2023

Gibt die Frei/Gebucht-Informationen für den Empfänger zurück.

Syntax

Ausdruck. FreeBusy( _Start_ , _MinPerChar_ , _CompleteFormat_ )

Ausdruck Eine Variable, die ein Recipient-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Start	Erforderlich	Date	Das Startdatum für den zurückgegebenen Zeitraum der Frei/Gebucht-Informationen.
MinPerChar	Erforderlich	Long	Die Anzahl der Minuten pro Zeichen, die in der zurückgegebenen Frei/Gebucht-Zeichenfolge dargestellt werden.
CompleteFormat	Optional	Variant	True, Wenn die zurückgegebene Zeichenfolge enthalten soll nicht nur Frei/Gebucht-Informationen, sondern auch Werte für alle Zeichen gemäß den OlBusyStatus -Konstanten.

Rückgabewert

Ein String -Wert, der die Frei/Gebucht-Informationen darstellt.

HinwBemerkungeneise

Standardmäßig wird eine Zeichenfolge zurückgegeben, die einen Monat mit Frei/Gebucht-Informationen darstellt, die mit dem Automatisierungsformat von Microsoft Schedule+ kompatibel ist (d. h. die Zeichenfolge enthält ein Zeichen für jede MinPerChar-Minute für bis zu einem Monat mit Informationen ab dem angegebenen Start-Datum).

Wenn das optionale Argument CompleteFormat ausgelassen wird oder False ist, dann wird "Frei" durch das Zeichen "0" und alle anderen Zustände durch das Zeichen "1" dargestellt.

Wenn CompleteFormat auf True festgelegt ist, wird eine der oben angegebenen Zeichenfolgen derselben Länge zurückgegeben. Die Zeichen entsprechen dann jedoch den OlBusyStatus-Konstanten.

Beispiel

Für Visual Basic für Applikationen (VBA) wird verwendet die FreeBusy -Methode, um eine Zeichenfolge mit Frei/Gebucht-Informationen mit einem Zeichen für jeden Tag zurückzugeben. In diesem Beispiel ermöglicht die Möglichkeit, dass die Frei/Gebucht-Informationen für diesen Empfänger nicht zugegriffen werden kann. Zum Ausführen dieses Beispiels müssen Sie "Nate Sun" durch einen gültigen Empfängernamen ersetzen.

Public Sub GetFreeBusyInfo() 
 Dim myNameSpace As Outlook.NameSpace 
 Dim myRecipient As Outlook.Recipient 
 Dim myFBInfo As String 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 Set myRecipient = myNameSpace.CreateRecipient("Nate Sun") 
 On Error GoTo ErrorHandler 
 myFBInfo = myRecipient.FreeBusy(#11/11/2003#, 60 * 24) 
 MsgBox myFBInfo 
 Exit Sub 
ErrorHandler: 
 MsgBox "Cannot access the information. " 
End Sub

In diesem Beispiel für VBA wird eine Zeichenfolge mit Frei/Gebucht-Informationen mit einem Zeichen für jede Stunde (vollständiges Format) zurückgegeben.

Set myRecipient = myNameSpace.CreateRecipient("Nate Sun") 
myFBInfo = myRecipient.FreeBusy(#8/1/03#, 60, True)

Siehe auch

Recipient-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über