Application.FilePageSetupLegend-Methode (Project)
Erstellt eine Legende für das Drucken von Ansichten der Vorgangsdaten.
Syntax
Ausdruck. FilePageSetupLegend (Name, TextWidth, LegendOn, Alignment, Text, LabelFontName, LabelFontSize, LabelFontBold, LabelFontItalic, LabelFontUnderline, LabelFontColor)
expression Eine Variable, die ein Application-Objekt darstellt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Name | Optional | String | Der Name der Ansicht oder des Berichts, für die bzw. den Legenden für das Drucken eingerichtet werden. |
TextWidth | Optional | Integer | Die Breite des Textes in Zentimeter oder Zoll. |
LegendOn | Optional | Long | Die Seiten, auf denen die Legende angezeigt wird. Kann eine der folgenden PjLegend -Konstanten sein: PjNoLegend, PjAfterLastPage oder PjOnEveryPage. |
Alignment | Optional | Long | Die Ausrichtung des Texts in der Legende. Kann eine der folgenden PjAlignment -Konstanten sein: PjCenter, PjLeft oder PjRight. Der Standardwert ist PjCenter. |
Text | Optional | String | Der in der Legende anzuzeigende Text. Die speziellen Formatcodes können als Teil der Legende eingeschlossen werden. |
LabelFontName | Optional | String | Der Name der Schriftart. |
LabelFontSize | Optional | Integer | Der Schriftgrad in Punkt. |
LabelFontBold | Optional | Boolean | True, Wenn die Schriftart fett formatiert ist. anderenfalls False. |
LabelFontItalic | Optional | Boolean | True, Wenn die Schriftart kursiv ist. anderenfalls False. |
LabelFontUnderline | Optional | Boolean | True, Wenn die Schriftart unterstrichen ist. anderenfalls False. |
LabelFontColor | Optional | Long | Die Farbe der Schriftart. Kann eine der PjColor-Konstanten sein; weitere Informationen finden Sie in der Tabelle PjColor-Konstanten . |
Formatcodes
Formatcode | Beschreibung |
---|---|
&B | Schaltet Fettdruck ein oder aus. |
&I | Schaltet Kursivdruck ein oder aus. |
&U | Schaltet Unterstreichen ein oder aus. |
&""fontname"" | Druckt Zeichen, die auf den Formatcode folgen, in der angegebenen Schriftart. Beispiel: &""Arial"". |
&nn | Prints characters that follow the format code in the specified font size. Verwenden Sie eine zweistellige Zahl zum Angeben der Größe in Punkt. Beispiel: &08. |
&P""path"" | Fügt das angegebene Bild ein. Beispiel: &P"" [Meine Dokumente] \Image.gif""". Der Begriff [Eigene Dokumente] stellt den vollständigen Pfad zu Ihrem Ordner "Eigene Dokumente" dar. |
&[Datum] | Druckt das aktuelle Systemdatum. |
&[Zeit] | Druckt die aktuelle Systemzeit. |
&[Datei] | Druckt den Dateinamen. |
&[Seite] | Druckt die Seitenzahl. |
&[Seiten] | Druckt die Gesamtanzahl der Seiten eines Dokuments. |
&[Projektname] | Druckt den Projektnamen. |
&[Unternehmen] | Druckt den Firmennamen. |
&[Manager] | Druckt den Namen des Managers. |
&[Anfangstermin] | Druckt den Projektanfangstermin. |
&[Endtermin] | Druckt den Projektendtermin. |
&[Aktuelles Datum] | Druckt das aktuelle Projektdatum. |
&[Statusdatum] | Druckt das Projektstatusdatum. |
&[Ansicht] | Druckt den Ansichtsnamen. |
&[Bericht] | Druckt den Berichtsnamen. |
&[Filter] | Druckt den Filternamen. |
&[Speicherdatum] | Druckt das letzte Speicherdatum. |
&[Betreff] | Druckt das Thema. |
&[Autor] | Druckt den Autor. |
&[Schlüsselwort] | Druckt die Schlüsselwörter. |
&[Field_Name] | Gibt den Wert des felds aus, das mit Field_Name angegeben wurde. Wenn ein Makro in mehreren Sprachen ausgeführt wird, muss das mit Field_Name angegebene Feld den für jede Sprache lokalisierten Namen verwenden. Beispiel: &[Tatsächliche Kosten]. |
PjColor-Konstanten
Konstante | Konstante |
---|---|
pjColorAutomatic | pjNavy |
pjAqua | pjOlive |
pjBlack | pjPurple |
pjBlue | pjRed |
pjFuchsia | pjSilver |
pjGray | pjTeal |
pjGreen | pjYellow |
pjLime | pjWhite |
pjMaroon |
Rückgabewert
Boolesch
Bemerkungen
Bei Verwendung der FilePageSetupLegend -Methode ohne Angabe von Argumenten verwendet, wird das Dialogfeld Seite einrichten mit Auswahl der Registerkarte Legende angezeigt.
[!HINWEIS] FilePageSetupLegend funktioniert nur bei Ansichten von Vorgangsdaten.
Um eine Legende zu bearbeiten, bei der labelFontColor ein RGB-Hexadezimalwert sein kann, verwenden Sie die FilePageSetupLegendEx-Methode .
Beispiel
Im folgenden Beispiel wird eine zu druckende Legende eingerichtet.
Sub SetLegend()
Dim strLegend As String
strLegend = GetFontFormatCode("Arial")
strLegend = strLegend & "&BThis text will appear in the legend.&B"
Application.FilePageSetupLegend Text:=strLegend, _
Alignment:=pjCenter, LegendOn:=pjOnEveryPage
End Sub
Public Function GetFontFormatCode(strFontName As String) As String
GetFontFormatCode = "&" & Chr(34) & strFontName & Chr(34)
End Function
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.