vba - activating a MailMerge from excel -


i still quite new vba, best come on own. used macro recorder in word vba code mailmerge excel spreadsheet, , tied key binding ("^%o"). use sendkeys excel activate mailmerge.

here relevant excel code open word , activate mailmerge. need find "dear" , insert field recipients name excel. ^f through {right} sendkeys. again better way make happen, new know how yet. have excel sendkeys word "^%o" activating mailmerge. have sleeps there slow down code hoping find messing up.

' open word doc. run macro import mailing list / send emails. set wordapp = createobject("word.application") wordapp.documents.open filename:="path word doc" wordapp.visible = true  sleep 10000 appactivate "word doc" sleep 500 sendkeys "^f", true sleep 500 sendkeys "dear", true sleep 500 sendkeys "~", true sleep 500 sendkeys "{escape}", true sleep 500 sendkeys "{right}", true sleep 500 sendkeys "{right}", true sleep 500 sendkeys "^%o", true sleep 500

here word code put names after "dear" , send emails. add field "mr" curser position, , import mailing list. send emails list of emails excel. 

sub sendemails() ' ' macro1 macro ' '     activedocument.mailmerge.maindocumenttype = wdformletters     activedocument.mailmerge.opendatasource name:= _         "path excel spreadsheet" _         , confirmconversions:=false, readonly:=false, linktosource:=true, _         addtorecentfiles:=false, passworddocument:="", passwordtemplate:="", _         writepassworddocument:="", writepasswordtemplate:="", revert:=false, _         format:=wdopenformatauto, connection:= _         "provider=microsoft.ace.oledb.12.0;user id=admin;data source=path excel;mode=read;extended properties=""hdr=yes;imex=1;"";jet oledb:system database="""";jet oledb:registry path="""";jet oledb:engine t" _         , sqlstatement:="select * `email_list$`", sqlstatement1:="", subtype _         :=wdmergesubtypeaccess     activedocument.mailmerge.fields.add range:=selection.range, name:="mr"     activedocument.mailmerge         .destination = wdsendtoemail         .mailaddressfieldname = "email"         .mailsubject = "subject"         .suppressblanklines = true         .datasource             .firstrecord = wddefaultfirstrecord             .lastrecord = wddefaultlastrecord         end         '.execute pause:=false     end end sub

the weird problem running when run excel macro not import correctly. not sort of error not find fields needed excel spreadsheet. when activate word macro myself (even pressing keybinding) imports perfectly. why this, , how can fix it? not looking rework code right now. need works. go , upgrade code new knowledge after making work.

any appreciated.


Comments

Post a Comment

Popular posts from this blog

asynchronous - C# WinSCP .NET assembly: How to upload multiple files asynchronously -

i using winscp .net assembly uploading files. want upload multiple files asynchronous way. have created method works single upload. public class uploadingdata { private sessionoptions _sessionoptions; private session _session; //connection etc private void onconnected() { foreach (var fileinfo in localfileslist) { var task = task.factory.startnew(() => uploadfilesasync(fileinfo)); } } private async task uploadfilesasync(string file) { string remotefilepath = _session.translatelocalpathtoremote(file, @"/", "/test_data_upload"); var uploading = _session.putfiles(file, remotefilepath, false); //when done await task.run(() => thread.sleep(1000)); } } please suggest me correct way. thanks you can use backgroundworker class this: string[] images = new string[50]; foreach (var path in images) { backgroundworker
Read more

aws api gateway - SerializationException in posting new Records via Dynamodb Proxy Service in API -

i getting "__type": "com.amazon.coral.service#serializationexception" as reply in postman & in test console in api gateway trying post record directly dynamodb using api proxy services.. referring aws article - https://aws.amazon.com/blogs/compute/using-amazon-api-gateway-as-a-proxy-for-dynamodb/ here's mapping { "tablename": "tablenamegoeshere", "item": { "id" : "$context.requestid" "eventname" : "$input.path('$.eventname')", "timestamp" : $input.path('$.timestamp'), "answers": "$util.parsejson($input.path('$.answers'))" } } update: did asked ... , worked if try add array of json objects gives me above same error - here's trying now. please - couldnt find on google well #set($inputroot = $input.path('$')) { "tablename": "answer", "item": {
Read more

asp.net - Problems sending emails from forum -

i have been redesigning site has message board, has been written guy looked after site. it has few problems , written in .asp , uses .mdb files database. you can see whole thing here . feel free post if helps, test thing have set using original files , new database. the basic problem when posts message, supposed email sent them, have posted it. when replies, originator supposed message, replier has been posted. i’d have thought @ point in process there should script/file in postmessage.asp? the postmessage.asp page below. <% option explicit %> <!-- #include virtual="common/adovbs.inc" --> <html> <head> <meta http-equiv="content-type" content="text/html; charset=windows-1252"> <meta name="generator" content="microsoft frontpage 4.0"> <meta name="progid" content="frontpage.editor.document"> <title>new page 2</title> <base target="_self"
Read more