print userform and save to pdf

[cfinch100]

hi
i am looking for probably a macro that will either print a userform to pdf file and save, or print screen and and save so i can email them on ,have tried different threads (codes) but none really seem to work, after they have been saved in workbook or folder i will be emailing them on
any pointers please
cheers colin

[Sean Thomas]

Hi this is a piece of code that works

if you have a commandbutton on the userform
place this code in the userform module

Please Login or Register  to view this content.

[cfinch100]

hi
says vk_lmenu not defined any ideas
cheers colin

[Sean Thomas]

Sorry
forgot this piece of code that you need to put at the top of a general module
this declares the constants

Please Login or Register  to view this content.

[cfinch100]

hi
thanks for that sean still got problems though now ambigous name detected vk_snapshot
userform runs but click command button and this appears although states in module its there
cheers colin

[cfinch100]

hi sean
have uploaded program frmmfrsa has command button6 on it
not sure if put code in right place if you have time to look ,i must be doing something wrong
cheers colin

[Norie]

Colin

You have the declarations in both Module1 and Module5.

[cfinch100]

hi
thanks norie i knew it was me ,this sends to one note can not see in code where it says it will send can it be sent to floder for email or direct to outlook for emailing
cheers colin

[Norie]

Colin

When I run the code it seems to send something to the printer, doesn't print anything thouhgh - printer's offline.

Doesn't do anything with OneNote though I do have it installed, not running though.

Do you have it running?

[Sean Thomas]

I have cutepdf writer installed.

This code usually opens up a save as screen to save the pdf.
cutepdf writer is a free programme you can down load

[cfinch100]

hi norie
have installed one note and have the userform on screen but says it has 4 pages,not sure how to se one note have not had anything to do with it and printer at home is not working at minute ,that is why i wanted to send as pdf ,have pro writer at work
cheers colin

[cfinch100]

hi sean
no save as screen pops up here as said seems to send to one note
chhers colin

[Norie]

Colin

Do your really need to print the form?

Couldn't you have a template worksheet set out/formatted as required and send the data from the form there?

Then you can save/send/print this worksheet rather than the form?

[cfinch100]

norie
yes that would work i think, if i knew how to do it that way , will have to look through some threads and see how its done
cheers colin

[Norie]

Colin

You already have code for putting data from the form to a worksheet.

All you need is code similar to that but probably with more specifics on where the data goes.

For saving, emailing etc you'll find plenty of examples if you search.

[cfinch100]

hi norie
yes got all that thanks just doing template now will let you know how it goes
cheers colin

[cfinch100]

hi norie
just a question is it best to have textboxes on template to populate data or just use the cells and lookup
cheers colin

[jaslake]

Hi Colin

In a Project I developed I have a UserForm that I send to Print Preview. I've modified the Code for you so it prints to PDF. The Code is assigned to a Print Button on the UserForm.

See if it works for you.

Please Login or Register  to view this content.

[Norie]

Hard you tell without knowing how you want the template to look.

One thing to consider is that it's probably easier working with cells.

[cfinch100]

hi
similar to frmmfrsanew that ive just uploaded, have put quick template sheet invoice thats not finished that has uses cells
cheers colin

[cfinch100]

hi
program stops at frmsummary.hide variable not defined any ideas
cheers colin

[jaslake]

Hi Colin

frmSummary is the Name of MY UserForm...what's the Name of YOUR UserForm?

[cfinch100]

hi jaslake
it does not like frmsummary.hide , have removed this and now works or seems to do not know where its saved them to so can veiw them think just says this workbook
cheers colin

[jaslake]

Hi Colin

The PDF is saved here

Please Login or Register  to view this content.

This Workbook Path is the Folder of the File that's running the Code...look in that Folder...whatever it is.

Your sentences are terribly hard to decipher...please use punctuation...I'm an OLD guy...humor me.

[cfinch100]

hi jaslake
ive found it comes out as text.pdf ,all i have to do now is save them with different no's into my folder, prob if then statement to increase no's many thanks
colin

[jaslake]

Hi Colin

It comes out as Test.pdf because this line of Code said to name it that

Please Login or Register  to view this content.

You'll need to come up with a Naming/Numbering scheme that works for you. If you require help with that define what it is you're trying to do...one of us will look at it.

[cfinch100]

hi
many thanks for all your help will mark solved because looks like what i need but will try nories suggestion aswell
thanks again colin

[jaslake]

You're welcome...glad I could help. Thanks for the Rep.

[cfinch100]

hi sean
you gave me this code it sends to c \documents,why can it be modified to go elsewhere
cheers colin

[jaslake]

Hi Colin

If you're referring to John...change the path here

Please Login or Register  to view this content.

[cfinch100]

hi jaslake
can you tell me why this code saves to documents as book1,book2 ect , try and add code to direct to c:\desktop and it loses the auto no at the end, eg saves one at book
then asks to overwrite, where in the code below does it point to documents folder to save

Please Login or Register  to view this content.

cheers colin

[jaslake]

Hi Colin

Please explain exactly what it is you're trying to do...perhaps I can help.

Also, post the entire procedure.

[cfinch100]

hi
ill try and explain
run program ,click reports
enter2 in ainscough ref,click search,msgbox so many instances appear,double click on one record in listbox ,click email contact,repeat
this sends userform to my documents as book1 and book2,i would like them sent to c:\users\colin\desktop\new\ but still use book1,book2
auomatically entered,this i can not do ,managed to get it rediected once but only book1 went there
when entered second record it wanted to rewrite over the first one,
there are 8 records in list box at the minute that need copying over to folder \new\,these will be deleted when i email them to 2 users,
is there a way to select all 8 records and save as one book before emailing, the next batch of completed records may only contain 4 records or less,i have an email macro, i think that should do the emailing,
if i have to do one record at a time and auto save as book1,book2,book3 ect ,i will combine these into one work book and attach the workbook to the email macro
any pointers would be good thanks
cheers colin
ps the code is in frmmfrsanew

[jaslake]

Hi Colin

Make certain this Folder exists

c:\users\colin\desktop\new\

Then assign this code to your Email Button...let me know of issues.

Please Login or Register  to view this content.

[cfinch100]

hi
brilliant just what i needed only concern if hit email button twice by mistake 1004 error occurs otherwise great
many thanks colin

[jaslake]

Hi Colin

In the States we call this the "yips"

if hit email button twice by mistake

I'll look at it.

[jaslake]

Hi Colin

Add the two lines of Code as indicated...seems to work for me.

Please Login or Register  to view this content.

[cfinch100]

hi
have just changed screen updating to true the one abovethis line ,

Please Login or Register  to view this content.

ll
crashed on that line, works a treat ,thats great many thanks ,will try do some more myself thanks for help
cheers colin

[jaslake]

You're welcome...glad I could help. Thanks for the Rep.