Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Excel VBA an PDF Formular anpassen

Frage Entwicklung VB for Applications

Mitglied: Detel1

Detel1 (Level 1) - Jetzt verbinden

25.02.2015 um 01:46 Uhr, 826 Aufrufe, 3 Kommentare

Hallo!
Ich habe ein PDF Formular das aus Excel VBA beschrieben wird, per email versandt und per outlook zurueck kommt und wieder mit VBA ausgelesen wird.
Dieses Formular war eine Seite lang. Jetzt habe ich ein neues Formular das 3 Seiten lang ist.
Ich habe versucht das PDF Formular anzupassen. Dies funktioniert nicht. VBA kann das auf der ersten Seite liegende Feld "Serial_Number" nicht finden und gibt eine Fehlermeldung aus.
Seit zwei Tagen versuche ich verschiedene Optionen. Ohne Erfolg.
Das Original PDF Formular war in Englisch. Das Neue nun in Deutsch. Habe Begriffe ausgetauscht die im Original Formular standen, z.Bsp. "Formular" durch "topmostSubform" " Seite" durch "Page" ersetzt doch ich muss irgend etwas uebersehen. Mit Logik ist dem Problem nicht bei zu kommen. Meine VBA Kentnisse sind auf Anfaenger Niveau.
Kann mir jemand helfen die Anpassung vorzunehmen?

Hier sind die zwei PDF Dateien:
[URL=http://www.file-upload.net/download-10342406/NEUcontract_form_live.pdf. ...]NEUcontract_form_live.pdf[/URL]
[URL=http://www.file-upload.net/download-10342405/ORIGINALcontract_form_live ...]ORIGINALcontract_form_live.pdf[/URL]

und hier der komplette VBA Code:
[URL=http://www.file-upload.net/download-10342419/VBA_Formular_Kundendaten.t ...]VBA_Formular_Kundendaten.txt[/URL]


und hier ist der VBA Code:
'Fill the form fields.
objJSO.getField("topmostSubform.Page1[0].Serial_Number[0]").Value = strSerial
objJSO.getField("topmostSubform[0].Page1[0].Call_Sign[0]").Value = strCallSign
If Err.Number <> 0 Then
'Close the form without saving the changes.
objAcroAVDoc.Close True
'Close the Acrobat application.
objAcroApp.Exit
'Inform the user about the error.
MsgBox "The field """ & "Serial Number" & """ could not be found!", _
vbCritical, "Field error"
GoTo ErrFound

Vielen Dank im Voraus

Detlef Heun
Mitglied: colinardo
LÖSUNG 25.02.2015, aktualisiert um 14:31 Uhr
Hallo Detlef, Willkommen auf Administrator.de!
Nach einem Test solltest du das Feld hiermit ansprechen können (es fehlte nur der Index für die Form)
objJSO.getField("topmostSubform[0].Page1[0].Serial_Number[0]").Value = strSerial
Grüße Uwe
Bitte warten ..
Mitglied: Detel1
25.02.2015 um 13:14 Uhr
Vielen Dank Uwe!
Es hat funktioniert.
Ich dachte mir schon das es nur ein kleiner Fehler war, aber gewusst wo.
Viele Gruesse
Detlef
Bitte warten ..
Mitglied: colinardo
LÖSUNG 25.02.2015, aktualisiert um 14:32 Uhr
Keine Ursache.
Wenns das dann war, den Beitrag bitte noch auf gelöst setzen. Merci.

Grüße Uwe
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Microsoft Office
gelöst CSV-Datei mit einem VBA Makro in Excel einlesen und leicht anpassen (5)

Frage von JoSiBa zum Thema Microsoft Office ...

Microsoft Office
gelöst Excel VBA - Inhalte und Dateiname von txt-Dateien automatisch in Excel importieren (2)

Frage von Booster07 zum Thema Microsoft Office ...

VB for Applications
Excel VBA Sortierung von Daten (5)

Frage von easy4breezy zum Thema VB for Applications ...

VB for Applications
gelöst Excel VBA Eine oder mehrere Zellen Verschieben (2)

Frage von batchnewbie zum Thema VB for Applications ...

Heiß diskutierte Inhalte
Linux
gelöst Boot failed: not a bootable disk (10)

Frage von Fleckmen zum Thema Linux ...

Windows Installation
Eine etwas (wirklich) speziellere Frage: Windows 10-Installation über (9)

Frage von DerFurrer zum Thema Windows Installation ...

Windows Server
Probleme mit Client Software Zugriff auf Windows Server 2012 (8)

Frage von it-kolli zum Thema Windows Server ...

Multimedia & Zubehör
gelöst Iphone 6 prob (8)

Frage von jensgebken zum Thema Multimedia & Zubehör ...