Re: Submit Word Form via Email in VBA Macro

Discussion in 'Word VBA Beginners' started by Mad Dad, Apr 7, 2008.

  1. Mad Dad

    Mad Dad Guest

    I too have been looking and exhausted Google in my efforts. I am not a
    coder and many suggestions I found impled that I need to be, thus very
    little real assistance available to me.... While I can use Adobe Pro to do
    what I want, not all of us have Adobe Pro, but every one has access to Word.
    NOTE: We do not use outlook as a mail system.

    1: My errors were in the first line to start with..
    Activedocument.HasRoutingSlip = True

    Thus, I found that I had to enable routing... That in it's self is not
    straight forward and is dependant which version of word, one is using. As to
    what options you are presented with when selecting the sent to.

    We use a mix of Office 2003 and 2002 at work...

    2: However can not find the Send to for Review / Routing in Office 2007?

    I liked forms... Simple and did most of what we needed... but it was always
    a pain to get people to return them... Now all I want is a Submit button :)
    or the code that I can copy and paste; That allows a document that has been
    edited or had forms fiels filled in, to be "√Ąttached to an e-mail" and
    returned to an address of my chosing.

    At this stage, I am still looking but find it hard to believe that an
    application of this level is now to the extent that the average user is now
    lost, with out a coding background or having their own web server to do any
    thing.

    If any one can assist you have my sincere thanks.

    Mark
     
    Mad Dad, Apr 7, 2008
    #1
    1. Advertisements

  2. If you want to automate something, then you have to expect to use some code
    to do it.

    See the article "How to send an email from Word using VBA" at:

    http://www.word.mvps.org/FAQs/InterDev/SendMail.htm

    and "What do I do with macros sent to me by other newsgroup readers to help
    me out?" at:

    http://www.word.mvps.org/FAQs/MacrosVBA/CreateAMacro.htm




    --
    Hope this helps.

    Please reply to the newsgroup unless you wish to avail yourself of my
    services on a paid consulting basis.

    Doug Robbins - Word MVP
     
    Doug Robbins - Word MVP, Apr 7, 2008
    #2
    1. Advertisements

  3. Mad Dad

    Mad Dad Guest

    Doug

    Have aready found the link to the SendMail from word using the built-in
    RoutingSlip method.

    Problem is as stated in my post, that getting the document activated for a
    RoutingSlip is the issue.

    It is a bit of a hit and miss depending on which version and there is
    little I could find on this.

    As I understand it... Please feel free to correct any of my steps if in
    error....

    1: Some how activate RoutingSlip (Version dependent) -

    A: Step one is to open the document > use the send to Routing (Office 2002)
    folder?

    B: Office 2003 ???

    B: Office 2007 ???

    2: Add a button, at the bottem of the page of the document that you want to
    send out and have returned; then apply this code( as per the other link you
    provided):

    Activedocument.HasRoutingSlip = True
    With Activedocument.RoutingSlip
    .Subject = "New subject goes here"
    .AddRecipient ""
    .AddRecipient ""
    .Delivery = wdAllAtOnce
    End With
    Activedocument.Route

    Save this doc as your final.

    3: Then attach and send out to those you want, and when they finish
    entering the data, they hit the submit and it returns the filled in document
    to the addresses identified in the code attached to you submit button.

    Please feel free to correct any of my steps if in error....

    Mark
     
    Mad Dad, Apr 7, 2008
    #3
  4. Mad Dad

    NYSA-HD Guest

    The code in the site does not function as well as all the facts that you have
    stated. We ended up just creating the Word form, but having people put the
    to in manually. The adobe was an issue because it didn't want to work with
    certain email applications.
     
    NYSA-HD, Apr 15, 2008
    #4
  5. Mad Dad

    NYSA-HD Guest

    the code for the routing slip is what I wanted, but it doesn't work
     
    NYSA-HD, Apr 15, 2008
    #5
  6. The .HasRoutingSlip, .Route, .Routed and .RoutingSlip methods/attributes are
    not available in VBA with Word 2007.

    There is a Send for Review button that you can add to the QAT though that
    might suit your purpose.

    --
    Hope this helps.

    Please reply to the newsgroup unless you wish to avail yourself of my
    services on a paid consulting basis.

    Doug Robbins - Word MVP
     
    Doug Robbins - Word MVP, Apr 16, 2008
    #6
  7. Mad Dad

    BZ Guest

    I believe I just did what you are wanting to do, using the Review method....
    I created a command button on my form and used the following code:

    ActiveDocument.SendForReview _
    Recipients:="Your Email address here", _
    Subject:="Your Subject here", _
    ShowMessage:=False, _
    IncludeAttachment:=True
    MsgBox "Your Message has been sent!"

    Hope that's what you were looking for!
     
    BZ, Apr 24, 2008
    #7
  8. Mad Dad

    Tim Gelhardt Guest

    Oh my gosh! Thank you so much for this code! I've spent two days scouring Google for an answer to what I thought would be a common question. Not everyone uses Outlook, and routing slip seems to have been dropped off in Word 2007. This is exactly what I needed. I can't believe it was so hard to find. I'm not a VB coder in the slightest so I really rely on forums and people like you for the help.

    Much appreciated!
    Regards,
    Tim
     
    Tim Gelhardt, Mar 8, 2012
    #8
    1. Advertisements

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.