vba - VB script to export to pdf in Command Button (ActiveX) in Word 2010 -

-

ok, have word 2010 macro enabled template handy dandy forms people can fill out. have created button says "convert pdf" because people dont know how natively. entered vb editor of particular commandbutton want have functionality. here's whats in button:

private sub commandbutton1_click() sub convert_pdf()   dim desktoploc string  dim filename string  dim mypath string      desktoploc = createobject("wscript.shell").specialfolders("desktop")     filename = thisdocument.name     mypath = desktoploc & "\" & filename      activedocument.exportasfixedformat outputfilename:= _         mypath, _         exportformat:=wdexportformatpdf, openafterexport:=true, optimizefor:= _         wdexportoptimizeforprint, range:=wdexportalldocument, from:=1, to:=1, _         item:=wdexportdocumentcontent, includedocprops:=true, keepirm:=true, _         createbookmarks:=wdexportcreatenobookmarks, docstructuretags:=true, _         bitmapmissingfonts:=true, useiso19005_1:=false end sub end sub

when run code get..... bam! compile error: expected end sub

if take out sub convert_pdf() , pertaining end sub, dont sub error messages, error message:

the file [file name] cannot opened beacause there problems contents. details: file corrupt , cannot opened. replace [file name] file's actual name.

i'll honest, i'm complete n00b @ vb , google turning out not being helpful far :/

any insight?

private sub commandbutton1_click()     convert_pdf end sub   sub convert_pdf()   dim desktoploc string  dim filename string  dim mypath string      desktoploc = createobject("wscript.shell").specialfolders("desktop")     filename = thisdocument.name     mypath = desktoploc & "\" & filename & ".pdf"      activedocument.exportasfixedformat outputfilename:= _         mypath, _         exportformat:=wdexportformatpdf, openafterexport:=true, optimizefor:= _         wdexportoptimizeforprint, range:=wdexportalldocument, from:=1, to:=1, _         item:=wdexportdocumentcontent, includedocprops:=true, keepirm:=true, _         createbookmarks:=wdexportcreatenobookmarks, docstructuretags:=true, _         bitmapmissingfonts:=true, useiso19005_1:=false end sub

Comments

Post a Comment

Popular posts from this blog

java - Jmockit String final length method mocking Issue -

-
using jmockit 1.2 jar, trying mock string's length method getting unexpected invocation exception: failed: test java.lang.illegalstateexception: missing invocation mocked type @ point; please make sure such invocations appear after declaration of suitable mock field or parameter @ stringdemo.testa$1.<init>(testa.java:17) @ stringdemo.testa.test(testa.java:13) i using testng: @test public void test() throws exception { new expectations() { @mocked("length") string astring; { astring.length(); result = 2; } }; system.out.println(a.showa("test")); } } actual class a: public class { public static int showa(string str){ int a= str.length(); return a; } } this wrong way of recording expected results. shouldn't mock , record string's length() method, record showa() instead. here solution @suppresswarnings("unused&qu
Read more

asp.net - Razor Page Hosted on IIS 6 Fails Every Morning -

-
i have simple page in intranet uses razor/asp fetch single record table , display it, plus few graphic, dashboard display. meaning, no user intervention other first time open ie internal url. the problem having every morning ie displays "page not found or network error" message. refresh page, , it's stuck , doesn't display anything. try different pc, open ie internal url , it's stuck... ...until following: login server hosting page run inetmgr go web sites, etc right click on page that's giving me problem , select browse at moment, error message: server error in '/' application. -------------------------------------------------------------------------------- type of page not served. description: type of page have requested not served because has been explicitly forbidden. extension '.cshtml' may incorrect. please review url below , make sure spelled correctly. requested url: /application/dashboard.cshtml ---------------
Read more

c++ - wxwidget compiling on windows command prompt -

-
can please guide me on method,as how compile wxwidget using windows command prompt or msys. [i can't seem find on wxwiki/wxwidget official book/anywhere else] i have compiled wxwidget instructions have provided (using msys). from searching on internet seems 1 can (maybe?) through use of makefile (is correct?) if yes: directory & how should link wx libraries in makefile if no: way besides makefile? i know can use ide's code::block , make life simpler prefer compile using command prompt/msys. thanks in advance.
Read more