AFormAut : Alignment プロパティ

TOP > AFormAut > Alignment プロパティ


説明

テキストフィールドでのテキストの整列を示します。

設定又は取得できる値は、以下のとおりです。

  • left : 左
  • center : 中央
  • right : 右
AFormAut : Alignment プロパティ 設定後の例

テキストフィールド以外で使うと実行エラーになります。

形式

[ 取得 / 設定 ] String

設定又は戻り値

設定、又は取得可能な文字列

  1. left : 左
  2. center : 中央
  3. right : 右

1.  上記以外の値を設定しようとすると、実行エラーが発生します。

AFormAut : Alignment プロパティ 実行エラー

Microsoft Visual Basic
実行エラー '5':
プロシージャの呼び出し、または引数が不正です。
終了 デバッグ ヘルプ

2.  テキストフィールド以外のフィールドに設定しようとすると、実行エラーが発生します。

AFormAut : Alignment プロパティ 実行エラー

Microsoft Visual Basic
実行エラー '-2147220989 (80040203)':
このプロパティまたはメソッドは、この種類のフィールドには適用されません。
終了 デバッグ ヘルプ

動作するバージョン

Adobe
Acrobat
結果備考
4NOAcrobat 4.0 ※Windows 98SE + Excel 2000 *1
※古いPDFのバージョンはOK!
5NOAcrobat 5.0.5 + Excel 2003 *1
※古いPDFのバージョンはOK
6NOAcrobat 6.0.6 Pro + Excel 2003 *1
※古いPDFのバージョンはOK
7OKAcrobat 7.1.4 Pro + Excel 2003 *2 
※レジストリ操作で全面的に可能になる
8NOAcrobat 8.3.1 Pro + Excel 2003
※当Acrobatバージョンでは全面的に不可
9NOAcrobat 9.5.5 Extended + Excel 2003
※当Acrobatバージョンでは全面的に不可
10OKAcrobat X (10.1.8) Extended + Excel 2003
11OKAcrobat XI (11.0.5) Extended + Excel 2003
  • OK : 正常処理。
  • NO : 動作しない。 又は実行時にエラーになる。
  • *1 : 「PDF のバージョン」によっては正常処理出来ない場合がある。
  • *2 : 全ての「PDF のバージョン」での処理を可能にしたければ、
    処理前のレジストリに以下を追加する必要があります。
    [HKEY_CURRENT_USER¥Software¥Adobe¥Adobe Acrobat¥7.0¥AVAlert]
    [HKEY_CURRENT_USER¥Software¥Adobe¥Adobe Acrobat¥7.0¥AVAlert¥cCheckbox]
    "idocNewerVersionWarning"=dword:00000001

サンプル:Excel のVBA

説明 : PDF上のテキストフィールドの揃えを左、中央、右に変更します。

AFormAut : Alignment プロパティ
001 Option Explicit 002 003 Public Const PDSaveFull = &H1 004 Public Const PDSaveLinearized = &H4 005 Public Const PDSaveCollectGarbage = &H20 006 007 Sub AFormAut_Alignment_test() 008 009 Const CON_PDF_FILE = "D:\work\ReleaseNotes.pdf" 010 Const CON_PDF_FI_S = "D:\work\ReleaseNotes-S.pdf" 011 012 Dim lRet As Long 013 014 'Acrobatオブジェクトの定義&作成 015 Dim objAcroApp As New Acrobat.AcroApp 016 Dim objAcroAVDoc As New Acrobat.AcroAVDoc 017 Dim objAcroPDDoc As Acrobat.AcroPDDoc 018 019 Dim objAFormApp As AFORMAUTLib.AFormApp 020 Dim objAFormFields As AFORMAUTLib.Fields 021 Dim objAFormField As AFORMAUTLib.Field 022 023 '※CreateObject("AFormAut.App")のエラー 024 '※[429 ActiveXコンポーネントはオブジェクトを作成できません。] 025 '※回避用 / メモリにAcrobatを強制ロードさせる 026 objAcroApp.CloseAllDocs 027 028 '*―――――――――――――――――――-- 029 '* PDFファイルを開く 030 031 '処理対象のPDFファイルを開く 032 '※AVDocでOpenしないと"AFormAut.App"で実行エラー 033 lRet = objAcroAVDoc.Open(CON_PDF_FILE, "") 034 If lRet = 0 Then 035 MsgBox "AVDocオブジェクトはOpen出来ません" & vbCrLf & _ 036 CON_PDF_FILE, vbOKOnly + vbCritical, "処理エラー" 037 GoTo Skip_AFormAut_Alignment_test: 038 End If 039 040 '*―――――――――――――――――――-- 041 '* AFormオブジェクトの作成 042 043 Set objAFormApp = CreateObject("AFormAut.App") 044 Set objAFormFields = objAFormApp.Fields 045 046 '*―――――――――――――――――――-- 047 '* テキストフィールドの揃えを変更する 048 049 Set objAFormField = objAFormFields.Item("Text1.dt1") 050 objAFormField.Alignment = "left" 051 ' objAFormField.Value = objAFormField.Alignment 052 053 Set objAFormField = objAFormFields.Item("Text1.dt2") 054 objAFormField.Alignment = "center" 055 ' objAFormField.Value = objAFormField.Alignment 056 057 Set objAFormField = objAFormFields.Item("Text1.dt3") 058 objAFormField.Alignment = "right" 059 ' objAFormField.Value = objAFormField.Alignment 060 061 Skip_AFormAut_Alignment_test: 062 063 '*―――――――――――――――――――-- 064 '* 終了処理 065 066 '変更したPDFファイルの保存はPDDoc.Saveで必ず行う 067 Set objAcroPDDoc = objAcroAVDoc.GetPDDoc 068 lRet = objAcroPDDoc.Save( _ 069 PDSaveFull + PDSaveCollectGarbage + PDSaveLinearized, _ 070 CON_PDF_FI_S) 071 If lRet = 0 Then 072 MsgBox "05: PDFファイルへ保存出来ませんでした" & vbCrLf & _ 073 CON_PDF_FI_S, vbOKOnly & vbCritical, "エラー" 074 End If 075 076 'AVDocを閉じる 077 lRet = objAcroAVDoc.Close(1) 078 079 'Acrobatアプリケーションの終了 080 objAcroApp.Hide 081 objAcroApp.Exit 082 083 'オブジェクトの開放 084 Set objAFormFields = Nothing 085 Set objAFormApp = Nothing 086 Set objAcroAVDoc = Nothing 087 Set objAcroPDDoc = Nothing 088 Set objAcroApp = Nothing 089 090 MsgBox "End Sub" 091 092 End Sub


 Highlight:プログラミング言語のソースコードを構文で色分け (GUI編)
 


実行結果

1. Acrobat 7.1.4

AFormAut : Alignment プロパティ

2. Acrobat X (10.1.8)

Acrobat 7.1.4 と結果は同じ。

3. Acrobat XI (11.0.5)

Acrobat 7.1.4 と結果は同じ。

備考

  1. 上記サンプルでは、フィールド名を完全修飾(フル名称)で指定しています。
    フィールド名は、xxx.yyy の様にピリオドで区切ってあるフィールド名が複数ある時は、xxx だけを指定すれば頭に xxx. がつく全てのフイールド名を対象にする事が出来ます。
    しかし、このプロパティはそれが出来ません。
    以下を実行すると、実行エラーになります。
      
    例 : 頭に「Text1.」のテキストフィールド名を中央そろえに設定しようとすると 
        Set objAFormField = objAFormFields.Item("Text1"
        objAFormField.Alignment = "center" <ー★実行エラー
    AFormAut : Alignment プロパティ 実行エラー

    Microsoft Visual Basic
    実行エラー '-2147220989 (80040203)':
    このプロパティまたはメソッドは、この種類のフィールドには適用されません。
    終了 デバッグ ヘルプ

  2. Acrobat JavaScript ( Acrobat 8.0 ) に相当する命令が alignment です。

Adobe Web 解説 URL(英語)

その他の参考URL

  1. JavaScript for Acrobat API Reference Adobe Acrobat SDK バージョン 8.0 のalignment を参照
    ※Acrobat JavaScript の詳細な解説書 / Acrobat v8.0 リファレンス(765頁)         

戻る

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

CAPTCHA


出来るだけ早く返答する様には心がけています。
が、遅くなる時もありますのでご了承ください。


SAMURAI Plugin

コメントをする時は出来れば以下もお願いします。

  • OS名 バージョン
  • Acrobat バージョン
  • ツール(Excel等) バージョン
コメントにサンプルコードを入れるとエラーになる場合が有ります。その時はコードの前後に <code> ・・・</code> タグを入れてください。

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください