Acrobat 4. 0 Windows 98SE Excel 2000 1 PDFOK. Adobe Acrobat Reader For Windows 98Se' title='Adobe Acrobat Reader For Windows 98Se' />PDF Excel VBA PDFTOP PDFPDF PDF PDF PDF Acrobat 4Acrobat 4. Windows 9. 8SE Excel 2. PDFOK5Acrobat 5. Excel 2. PDFOK6Acrobat 6. Pro Excel 2. PDFOK7. OKAcrobat 7. Pro Excel 2. 00. NOAcrobat 8. Pro Excel 2. Acrobat9. NOAcrobat 9. 5. 2 Extended Excel 2. Acrobat1. OKAcrobat X 1. Extended Excel 2. OKAcrobat XI 1. 1. Extended Excel 2. Adobe Acrobat OS Adobe Adobe Acrobat Windows. OK NO PDF HKEYCURRENTUSERSoftwareAdobeAdobe Acrobat7. AVAlert HKEYCURRENTUSERSoftwareAdobeAdobe Acrobat7. AVAlertc. Checkbox idoc. Newer. Version. Warningdword 0. Excel VBAF8 AForm. Aut Option Explicit. Sub AForm. AppTest0. On Error Go. To ErrAForm. AppTest0. 1     Dim i               As Integer. Dim i. Page. Num        As Integer. Dim b. Ret. 1           As Boolean. Dim b. Ret. 2           As Boolean. Adobe Acrobat Reader For Windows 98Se' title='Adobe Acrobat Reader For Windows 98Se' />Dim b. End            As Boolean. Dim s. File. Pathnew   As String. Dim obj. AForm. App     As AFORMAUTLib. AForm. App Dim obj. AForm. Fields  As AFORMAUTLib. Fields Dim obj. AForm. Field   As AFORMAUTLib. Field Const s. File. Path D worksample. End TrueAcrobatAcrobat 4,5,6    Dim obj. Acro. App As Acrobat. CAcro. App    Dim obj. Acro. AVDoc As Acrobat. CAcro. AVDoc    Dim obj. Acro. PDDoc As Acrobat. CAcro. PDDoc    Set obj. Acro. AVDoc Create. ObjectAcro. Exch. App    Set obj. Acro. AVDoc Create. ObjectAcro. Exch. AVDoc    Set obj. Acro. PDDoc Create. ObjectAcro. Exch. PDDocAcrobat 7,8,9,1. Dim obj. Acro. App     As New Acrobat. Acro. App Dim obj. Acro. AVDoc   As New Acrobat. Acro. AVDoc Dim obj. Acro. PDDoc   As New Acrobat. Acro. PDDoc Create. ObjectAForm. Aut. App4. 29 Active. X Acrobatobj. Acro. App. Close. All. DocsPDFb. Ret. Acro. AVDoc. Opens. File. Path, If b. Ret. 1 False Then. Msg. Box AVDocOpen, vb. OKOnly vb. Critical, b. End False. Go. To SkipAForm. AppTest0. 1 End If. Set obj. Acro. PDDoc obj. Acro. AVDoc. Get. PDDoc i. Page. Num obj. Acro. PDDoc. Get. Num. Pages Set obj. AForm. App Create. ObjectAForm. Aut. App Set obj. AForm. Fields obj. AForm. App. Fields For i 0 To i. Page. Num 1PDFSet obj. AForm. Field obj. AForm. Fields. AddField i, text, i, 2. With obj. AForm. Field. Set. Border. Color RGB, 1, 1, 1, 0. Alignment center. Text. Size 1. 2. Text. Font Heisei. Min W3 Uni. JIS UCS2 H. Default. Value. Value Page i 1. Is. Read. Only True. End WithSet obj. AForm. Field Nothing. NextPDFs. File. Pathnew Replaces. File. Path,. pdf, new. Ret. 2 obj. Acro. PDDoc. Save1, s. File. Pathnew If b. Ret. False Then. Msg. Box PDF, vb. OKOnly vb. Critical, b. End False. End IfPDFb. Ret. 2 obj. Acro. AVDoc. CloseFalse If b. Ret. 2 False Then. Msg. Box AVDocClose, vb. OKOnly vb. Critical, b. End False. End If. SkipAForm. AppTest0. On Error Resume Nextb. Ret. 1 obj. Acro. AVDoc. Close1 Acrobatobj. Acro. App. Hide obj. Acro. App. ExitSet obj. AForm. Fields Nothing. Set obj. AForm. App Nothing. Set obj. Acro. PDDoc Nothing. Set obj. Acro. AVDoc Nothing. Set obj. Acro. App Nothing. If b. End True Then. Msg. Box, vb. OKOnly vb. Information, End If. Exit Sub. ErrAForm. AppTest0. 1     Msg. Box Err. Number vb. Cr. Lf Err. Description, vb. OKOnly vb. Critical, b. End False. Go. To SkipAForm. AppTest0. 1 End SubHTMLSource. Converter, Adobe Tech. Note ID 5. Adobe Tech. Note AcrobatOS Adobe Tech. Note ID 5. Visual Basic 6. VB6 AForm. App OLE Automation Objects http partners. Forms. APIReference. Page 2. Acrobat Set obj. AForm. Fields obj. AForm. App. Fields Acrobat 4. Office 2. 00. 0   Windows. SE Windows. Update Acrobat 5. Office 2. 00. 3 SP3   Windows. Windows 8.1 Black Alien Edition X64 2015 more. XP Pro SP3 Windows. Update Acrobat 6. Pro Office 2. 00. SP3   Windows. XP Pro SP3 Windows. Update Acrobat 7. Pro Office 2. 00. SP3   Windows. XP Pro SP2 Windows. Update Acrobat 8. Pro Office 2. 00. SP3   Windows. XP Pro SP3 Windows. Update Acrobat 9. Extended Office 2. SP3   Windows. XP Pro SP3 Windows. Update Acrobat X 1. Extended Office 2. SP3  Windows. XP Pro SP3 Windows. Update Acrobat XI 1. Extended Office 2. SP3 Windows. XP Pro SP3 Windows. Update AForm. App.