excel - Selecting Where PDF Files Save -


i'm relieved got code below work of community.

i have 1 more option on wishlist i'm struggling with. currently, code below save worksheet 3 way worksheet titled "post" separate pdf files folder select. triggered shape.

i'm trying make below code prompt folder select users can select pdf files saved, have ideas how this?

also, call shell @ bottom preferably open folder files saved, that's not necessary long users know files being saved :)

sub saveallpdf() dim integer dim fname string dim tabcount long   tabcount = sheets("post").index 'set tabcount last cell want pdf  ' begin loop.  = 3 tabcount 'set = number of first sheet want pdf in order left right tabcount     if sheets(i).visible <> xlsheetvisible     else         sheets(i)             fname = .range("c15") & " " & .range("e13") & "-" & .range("b1")             'the fname above equaling cells pdf's filename             'the folder directory below pdf files saved             .exportasfixedformat type:=xltypepdf, filename:= _             "c:\users\brandon\desktop\operation automated\rltemp\" & fname, quality:=xlqualitystandard, _             includedocproperties:=true, ignoreprintareas:=false, openafterpublish:=false         end     end if next  call shell("explorer.exe" & " " & "c:\users\brandon\desktop\operation automated\rltemp\", vbnormalfocus) 'this opens folder pdfs saved end sub

you can use excel's filedialog object:

sub saveallpdf()     dim integer     dim fname string     dim tabcount long      tabcount = sheets("post").index     'set tabcount last cell want pdf      dim dialog filedialog     dim path string      set dialog = application.filedialog(msofiledialogfolderpicker)     dialog.allowmultiselect = false     if dialog.show = -1         path = dialog.selecteditems(1)         ' begin loop.         = 3 tabcount         'set = number of first sheet want pdf in order left right tabcount             if sheets(i).visible <> xlsheetvisible             else                 sheets(i)                     fname = .range("c15") & " " & .range("e13") & "-" & .range("b1")                     'the fname above equaling cells pdf's filename                     'the folder directory below pdf files saved                     .exportasfixedformat type:=xltypepdf, filename:=path & "\" & fname, quality:=xlqualitystandard, _                     includedocproperties:=true, ignoreprintareas:=false, openafterpublish:=false                 end             end if         next          call shell("explorer.exe" & " " & path & "\", vbnormalfocus)         'this opens folder pdfs saved     end if end sub

-

Comments

Post a Comment

Popular posts from this blog

css - SVG using textPath a symbol not rendering in Firefox -

using textpath within symbol doesn't render in firefox. renders fine in latest chrome , ie, when try reference symbol, svg text doesn't render in firefox (37.0.1) - first box appears empty. code below (no external dependencies), there should 2 boxes word test flowing vertically in centre of each. edit: thought issue somehow involved flexbox layout, until paul pointed out issue exists without flexbox layout. the html is: <div> <svg id="not_working" viewbox="0 0 250 1200" preserveaspectratio="xmidymid meet"> <symbol id="test_symbol1" preserveaspectratio="xmidymid meet" viewbox="0 0 250 1200"> <path id="test_symbol_path" d="m 100 1200 l 100 0" /> <text font-size="100" fill="red"> <textpath text-anchor="middle" startoffset="50%" xlink:href="#test_symbol_path...
Read more

Java 8 + Maven Javadoc plugin: Error fetching URL -

i attempting generate javadoc links javadoc dependencies. have tried various means generate javadoc not produce qualified class names references classes dependencies. wanted links java doc simplified class names. however, java api classnames, no links , have qualified class names. working java 8. have following configuration: <plugin> <groupid>org.apache.maven.plugins</groupid> <artifactid>maven-javadoc-plugin</artifactid> <version>2.10.2</version> <configuration> <reportoutputdirectory>${project.basedir}/target</reportoutputdirectory> <destdir>javadoc</destdir> <windowtitle>epiphany</windowtitle> <doctitle>epiphany</doctitle> <show>private</show> <detectlinks>false</detectlinks> <detectoffline...
Read more

datatable - Matlab struct computations -

i download data yahoo! finance with: data = getyahoodailydata({'msft', 'axp'},'01/01/2000', '01/01/2015', 'dd/mm/yyyy'); and data stored 1x1 struct. want create tx2 matrix of daily adjusted closing prices msft , axp, column 7 in each table in struct. how can that? or better : there way make computations directly on information/prices in struct? you can access data in struct name. vecmsftadj = data.msft.adjclose; vecaxpadj = data.axp.adjclose; % if want n x 2 matrix madjclose = [vecmsftadj, vecaxpadj]; % personnaly prefer working table tadjclose = table; tadjclose.msftadj = vecmsftadj; tadjclose.axpadj = vecaxpadj;
Read more