次の方法で共有


Application.FilePageSetupLegend メソッド (Project)

タスク データのビューに対して印刷用の凡例を作成します。

構文

FilePageSetupLegend (Name, TextWidth, LegendOn, Alignment, Text, LabelFontName, LabelFontSize, LabelFontBold, LabelFontItalic, LabelFontUnderline, LabelFontColor)

expressionApplication オブジェクトを 表す変数。

パラメーター

名前 必須 / オプション データ型 説明
名前 省略可能 String 印刷用の凡例を設定するビューまたはレポートの名前を指定します。
TextWidth 省略可能 整数型 (Integer) テキストの幅をインチまたはセンチメートルで指定します。
LegendOn 省略可能 長整数型 (Long) 凡例を表示するページです。 PjLegend 定数は、次のいずれか: pjNoLegendpjAfterLastPagepjOnEveryPage
Alignment 省略可能 長整数型 (Long) 凡例のテキストの配置。 PjAlignment 定数は、次のいずれか: pjLeftpjCenterpjRight です。 既定値は、 pjCenter です。
Text 省略可能 String 凡例に表示するテキストを指定します。 特殊な 書式コード は、凡例の一部として含めることができます。
LabelFontName 省略可能 String フォントの名前。
LabelFontSize 省略可能 整数型 (Integer) フォントのサイズをポイント単位で指定します。
LabelFontBold 省略可能 ブール型 (Boolean) True の 場合、フォントは太字です。それ以外の場合、 false を指定 します。
LabelFontItalic 省略可能 ブール型 (Boolean) True の 場合、フォントが斜体にします。それ以外の場合、 false を指定 します。
LabelFontUnderline 省略可能 ブール型 (Boolean) True の 場合は、フォントに下線が引かれます。それ以外の場合、 false を指定 します。
LabelFontColor 省略可能 長整数型 (Long) フォントの色。 PjColor 定数を 1 つ指定できます。PjColor 定数の表を参照してください。

書式コード

書式コード 説明
&B 文字列を太字で印刷します。
&I 文字列を斜体で印刷します。
&U 下線設定のオン/オフを指定します。
&""fontname"" 印刷する文字のフォントを指定します。 たとえば、「&""Arial""」のように指定します。
nn を &する 印刷する文字のフォント サイズを 2 桁の数字で指定します。 nn には、ポイント数を表す 2 桁の数値を指定します。 たとえば、「&08」のように指定します。
&P""path"" 指定したイメージを挿入します。 たとえば、&P"" [マイ ドキュメント] \Image.gif")。 [My Documents] はユーザーの My Documents フォルダーの完全なパスを示します。
&[日付] システムの現在の日付を印刷します。
&[時間] システムの現在の時刻を印刷します。
&[ファイル] ファイル名を印刷します。
&[ページ] ページ番号を印刷します。
&[Pages] ドキュメントの総ページ数を印刷します。
&[プロジェクトのタイトル] タイトルを印刷します。
&[会社] 会社名を印刷します。
&[Manager] 管理者名を印刷します。
&[開始日] プロジェクトの開始日を印刷します。
&[終了日] プロジェクトの終了日を印刷します。
&[プロジェクトの現在の日付] プロジェクトの現在の日付を印刷します。
&[プロジェクトの状況報告日] プロジェクトの状況報告日を印刷します。
&[表示] ビュー名を印刷します。
&[レポート] レポート名を印刷します。
&[フィルター] フィルター名を印刷します。
&[最終保存日] 最終保存日を印刷します。
&[件名] サブタイトルを印刷します。
&[作成者] 作成者を印刷します。
&[キーワード] キーワードを印刷します。
&[Field_Name] [フィールド名] で指定されたフィールドの値を印刷します。 複数の言語環境でマクロを実行する場合、この [フィールド名] はマクロの実行環境の言語で指定する必要があります。 たとえば、日本語の場合は、「&[実績コスト]」のように指定します。

PjColor 定数

定数 定数
pjColorAutomatic pjNavy
pjAqua pjOlive
pjBlack pjPurple
pjBlue pjRed
pjFuchsia pjSilver
pjGray pjTeal
pjGreen pjYellow
pjLime pjWhite
pjMaroon

戻り値

Boolean

注釈

FilePageSetupLegend メソッドを使用して引数を指定せず、[ 凡例] タブで、[ ページ設定] ダイアログ ボックスが表示されます。

[!メモ] FilePageSetupLegend は、タスクのデータのビューでのみ機能します。

LabelFontColor を 16 進 RGB 値にできる凡例を編集するには、FilePageSetupLegendEx メソッドを使用します。

次の使用例は、印刷用に凡例の設定を行います。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。