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, 853 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 ..
Ähnliche Inhalte
Microsoft Office
gelöst Excel VBA In Userform Maske Text nach Eingabe löschen (1)

Frage von kluthi69 zum Thema Microsoft Office ...

Microsoft Office
Unterordner durchsuchen Excel VBA (1)

Frage von schwalbepilot zum Thema Microsoft Office ...

Microsoft Office
gelöst Excel VBA: Automatische Konvertierung von Textdatei (.txt) zu Exceldatei (.xlsx) (7)

Frage von Booster07 zum Thema Microsoft Office ...

Microsoft Office
gelöst Excel VBA Tabelleblätter kopieren und Umbenennnen (8)

Frage von Florian86 zum Thema Microsoft Office ...

Neue Wissensbeiträge
Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(29)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Humor (lol)

Bester Vorschlag eines Supporttechnikers ever: APC

(15)

Erfahrungsbericht von DerWoWusste zum Thema Humor (lol) ...

Windows Server

Exchange 2010 Active Directory und Windows Server 2016

(4)

Erfahrungsbericht von Herbrich19 zum Thema Windows Server ...

Heiß diskutierte Inhalte
Internet
gelöst Mitarbeiter surft auf unerwünschter Seite - Wie damit umgehen? (33)

Frage von sabines zum Thema Internet ...

Netzwerke
Wie erstelle ich ein Intranet (19)

Frage von Leonardnet zum Thema Netzwerke ...

LAN, WAN, Wireless
gelöst Eintägige Netzwerkunterbrechung trotz Backupleitung (15)

Frage von iAmbricksta zum Thema LAN, WAN, Wireless ...

Netzwerke
VPN-Server einrichten PPTPD-Einrichtung gescheitert (14)

Frage von MIlexx zum Thema Netzwerke ...