html - Loop through drop down and create separate Outlook email body -

-

i have dashboard. cell values based on drop down list value (drop down list = name of months). send each dashboard 5 different customers. have loop in code because of customers (for = 1 5), , have loop change email body based on drop down list value. issue email body same - not changing based on drop down value.

      sub custommailmessage()          dim oapp object         dim omail object         dim rng range         dim sig string         dim inputrange range          sig = readsignature("internal.htm")         set rng = thisworkbook.worksheets("sheet2").range("a1:m3")         set dvcell = worksheets("sheet2").range("s1")         set inputrange = evaluate(dvcell.validation.formula1)          each c in inputrange             = 1 5             dvcell = c.value         set oapp = createobject("outlook.application")         set omail = oapp.createitem(0)                 omail                     .to = thisworkbook.worksheets("sheet1").cells(i, 1).value                     .subject = "this subject"                     .htmlbody = c.value & rangetohtml(rng) & sig                     .display                 end             next         next c          set oapp = nothing         set omail = nothing          end sub        **funtion signature**     private function readsignature(signame string) string                dim ofso, otextstream, osig object                dim appdatadir, sig, sigpath, filename string                appdatadir = environ("appdata") & "\microsoft\signatures"                sigpath = appdatadir & "\" & signame                 set ofso = createobject("scripting.filesystemobject")                set otextstream = ofso.opentextfile(sigpath)                sig = otextstream.readall                readsignature = sig             end function    **funtion create html format excel , create email body**         function rangetohtml(rng range)              dim fso object             dim ts object             dim tempfile string             dim tempwb workbook              tempfile = activeworkbook.path & ".htm"              'copy range , create new workbook past data in             rng.copy             set tempwb = workbooks.add(1)             tempwb.sheets(1)                 .cells(1).pastespecial paste:=8                 .cells(1).pastespecial xlpastevalues, , false, false                 .cells(1).pastespecial xlpasteformats, , false, false                 .cells(1).select                 application.cutcopymode = false             end               'publish sheet htm file             tempwb.publishobjects.add( _                  sourcetype:=xlsourcerange, _                  filename:=tempfile, _                  sheet:=tempwb.sheets(1).name, _                  source:=tempwb.sheets(1).usedrange.address, _                  htmltype:=xlhtmlstatic)                 .publish (true)             end              'read data htm file rangetohtml             set fso = createobject("scripting.filesystemobject")             set ts = fso.getfile(tempfile).openastextstream(1, -2)             rangetohtml = ts.readall             ts.close             rangetohtml = replace(rangetohtml, "align=center x:publishsource=", _                                   "align=left x:publishsource=")              'close tempwb             tempwb.close savechanges:=false              'delete htm file used in function             kill tempfile              set ts = nothing             set fso = nothing             set tempwb = nothing         end function

any idea?


Comments

Post a Comment

Popular posts from this blog

How to show in django cms breadcrumbs full path? -

-
need advice - how show in breadcrumbs whole path article or page? i've got code: {% ance in ancestors %} <li> {% if not forloop.last %} <a href="{{ ance.get_absolute_url }}">{{ ance.get_menu_title }}</a> {% else %} <span class="active">{{ ance.get_menu_title }}</span> {% endif %} </li> {% endfor %} but shows "home" , current page. how modify show whole path in breadcrumbs? i've found in file menu_tags.py code calls ancestors. @ least there class showbreadcrumbs: class showbreadcrumb(inclusiontag): """ shows breadcrumb node has same url current request - start level: after level should breadcrumb start? 0=home - template: template used render breadcrumb """ name = 'show_breadcrumb' template = 'menu/dummy.html' options = options( argument('start_level', default=0, require...
Read more

php - Invalid Cofiguration - yii\base\InvalidConfigException - Yii2 -

-
Image
i've installed yii2-user module/dektrium yii2-app-basic application command composer require "dektrium/yii2-user:0.9.*@dev" config/console.php return [ . . 'modules' => [ 'gii' => 'yii\gii\module', 'user' => [ 'class' => 'dektrium\user\module', ], ], . . ] config/web.php 'components' => [ . . /* 'user' => [ 'identityclass' => 'app\models\user', 'enableautologin' => true, ], */ 'modules' => [ 'user' => [ 'class' => 'dektrium\user\module', ], ], . . ] after that, run command $ php yii migrate/up --migrationpath=@vendor/dektrium/yii2-user/migrations updating database schema . but, when run http://localhost/mylawsuit/yii/web/index.php?r=u...
Read more

ruby on rails - npm error: tunneling socket could not be established, cause=connect ETIMEDOUT -

-
i have app uses rails framework , implements angularjs part of front end. i have pushed heroku , have heroku toolbelt installed, when try migrate db using "heroku run rake db:migrate" receive following error(s): installing core plugins heroku-cli-addons, heroku-apps, heroku-fork, heroku-git, heroku-local, heroku-run, heroku-status... error installing package. try running again gode_debug=info see more output. ! `run` not heroku command. ! perhaps meant `-h`, `2fa`, `auth`, `join`, `open`, `orgs`, `pg`, `ps` or `rake`. ! see `heroku help` list of available commands. i run command "gode_debug=info heroku run rake db:migrate" , receive error: npm err! darwin 14.5.0 npm err! argv "/users/christopher_pelnar/.heroku/node-v4.2.1-darwin-x64/bin/node" "/users/christopher_pelnar/.heroku/node-v4.2.1-darwin-x64/lib/node_modules/npm/cli.js" "install" "heroku-cli-addons" "heroku-apps" "heroku-fork...
Read more