I am halfway to what I need to accomplish with this code I found on the internet:
Private Sub Command80_Click()
Dim WshShell As Object
Set WshShell = CreateObject("Wscript.Shell")
WshShell.Run "Acrobat.exe E:\ssa1693.pdf"
' delay to let the form load completely
PauseTime = 1
Start = Timer
Do While Timer < Start + PauseTime
DoEvents
Loop
Set App = CreateObject("Acroexch.app")
Set avDoc = CreateObject("AcroExch.AVDoc")
Set avDoc = App.GetActiveDoc
Set pdDoc = avDoc.GetPDDoc
Set jso = pdDoc.GetJSObject
' let's clear the form
temp = jso.resetForm()
' populate a couple fields
Set x = jso.getField("ClientSSN")
x.Value = Me.SSN.Value
Set x = jso.getField("ClientFirstName")
x.Value = Me.FirstName.Value
Set x = jso.getField("LasteName")
x.Value = Me.LastName
Set x = jso.getField("ClientFirstName")
x.Value = Me.FirstName.Value
'housekeeping on the way out
Set App = Nothing
Set avDoc = Nothing
Set pdDoc = Nothing
Set jso = Nothing
End Sub
So this code sets my values in the pdf form nicely but I would like it to do a little more. Sorry I am a rank amatuer so by gentle. I want to save the newly populated form as "ClientFirstName""ClientLastName"SSA1693 AND I want it saved to my Office 365 oneDrive, AND I want it automatically sent to my client at their email address that is sitting on the microsoft access form. Any ideas? Thanks s much in advance!