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...
Read more

What is the difference between data design and data model(ERD) -

-
i have google question , find answer in day. know, data design many many table have list column,and mark pk , fk. why er-diagram have find this? data design process of designing database. main output of data design detailed logical data model of database. some people data design includes of needed logical , physical design choices , physical storage parameters needed generate design in data definition language. technically, database analysis, database analysts (dbas) trained do. while person can both data design , database analysis, these 2 different tasks. data design models data. database analysis takes model , applies 1 or more database engines (relational, hierarchical, nosql). a logical data model 1 of main outputs of data design. data model represented entity relationship diagram, or er diagram.
Read more

ios - Can NSManagedObject conform to NSCoding -

-
i need transfer single object across device. right converting nsmanagedobject dictionary , archiving , sending nsdata. upon receiving unarchiving it. transfer nsmanagedobject archiving , unarchiving instead of creating intermediate data object. @interface test : nsmanagedobject<nscoding> @property (nonatomic, retain) nsstring * title; @end @implementation test @dynamic title; - (id)initwithcoder:(nscoder *)coder { self = [super init]; if (self) { self.title = [coder decodeobjectforkey:@"title"]; //<crash } return self; } - (void)encodewithcoder:(nscoder *)coder { [coder encodeobject:self.title forkey:@"title"]; } @end nsdata *archivedobjects = [nskeyedarchiver archiveddatawithrootobject:testobj]; nsdata *objectsdata = archivedobjects; if ([objectsdata length] > 0) { nsarray *objects = [nskeyedunarchiver unarchiveobjectwithdata:objectsdata]; } the problem above code is. crashes @ self.title in initwithcoder sa...
Read more