vba - Code for checking to see if a new message with a specific subject line has been already created Lotus -

-



i'm not programmer apologize in advance.

i have 3 different worksheets in workbook. each sheet has specific macro after numbers entered, shift supervisors can press button assigned macro , metrics sheet copied , pasted different worksheet in format filter-able/pivot-able columns. saves , closes data, goes shift report worksheet, copies pertinent cells, opens lotus , formats new message subject line stating correct shift number , date , pastes shift report data body of e-mail.

since there different button press on 3 worksheets, , can't count on supervisors enter numbers in specific order, need able tell if lotus has opened , created e-mail specific subject line see if needs created or if exists information in body. know if possible?

 dim nsession object  dim ndatabase object  dim nuiworkspace object  dim ndoc object  dim nuidoc object  dim wordapp object  dim worddoc object   dim msg string   msg = "leads report " & now() & vbnewline & vbnewline & _      "finishing:" & vbnewline & _      "**paste leadsheet cells here**" & vbnewline & vbnewline   sheets("leadsheet").select  set newrange = range("e4")  mystring = rangetostring(newrange)   set nsession = createobject("notes.notessession")  set nuiworkspace = createobject("notes.notesuiworkspace")  set ndatabase = nsession.getdatabase("", "")   if not ndatabase.isopen     ndatabase.openmail   end if   'create new document  '******************************(if statement see   'if document specific subject line has been   'created....'subject = doc.getitemvalue("subject")(0)???????  '****************************************   set ndoc = ndatabase.createdocument                    ndoc              .sendto = "email@email.com" 'change              .copyto = ""              .subject = format(date, "mm-dd-yyyy") & " lead report shift " & mystring               'email body text, including marker text replaced excel cells               .body = msg               .save true, false           end    'edit just-created document copy , paste excel cells  set nuidoc = nuiworkspace.editdocument(true, ndoc)        'find marker text in body item      'replace excel cell   nuidoc            'leadsheet       workbooks("master shift report sheet.xlsm").activate      sheets("leadsheet").select      range("b2:o62").select      activewindow.zoom = 86      selection.copy      set wordapp = createobject("word.application")      set worddoc = wordapp.documents.add      wordapp.selection         .pastespecial datatype:=4 & vbnewline         .wholestory         .copy      end       .gotofield ("body")      .findstring "**paste leadsheet cells here**"      .paste      'application.cutcopymode = false      '.send      '.close  end   set nsession = nothing

anything else looks wonky don't hesitate point out! i'm learning.





wiki

Comments

Post a Comment

Popular posts from this blog

python - Read npy file directly from S3 StreamingBody -

-
i have many .npy (numpy) , .json files saved in s3, need download , load these files. for json files downloading files , loading dictionary using following code: obj = s3.object(bucket, key) response = obj.get() body = response['body'].read().decode('utf-8') data = json.loads(body) that way avoid writing .json file disk , reading it. now want same .npy files, equivalent? currently downloading file, saving temp file on disk , loading np.load avoid if possible. following https://stackoverflow.com/a/28196540/3509999 : obj = s3.object(bucket, key) io.bytesio(obj.get()["body"].read()) f: # rewind file f.seek(0) arr = np.load(f) wiki
Read more

kotlin - Out-projected type in generic interface prohibits the use of metod with generic parameter -

-
i start using kotlin , defined interface this: interface aadapter<vh : recyclerview.viewholder> { fun oncreateaviewholder(parent: viewgroup): vh fun onbindaviewholder(v: vh, position: int) } and when try use on code: class klasa ( private val adapter: aadapter<*> ) { fun dosth(){ //... val vh = this.adapter.oncreateaviewholder(parent) //on below line error adapter.onbindaviewholder(v, position) //... } } i error out-projected type 'aadapter<*>' prohibits use of 'public abstract fun onbindaviewholder(v: t, position: int): unit i tied add "in" or "out" definition i'm confused. how allow it. replace aadapter<*> aadapter<recyclerview.viewholder> . class klasa ( private val adapter: aadapter<recyclerview.viewholder> ) { // ... because have declared aadapter has type parameter vh type subclass of recyclerview....
Read more

Asterisk AGI Python Script to Dialplan does not work -

-
i'm stuck project have check database of sip extension incoming caller id , dial sip extension. below receive when run script on asterisk cli. -- registered sip '9125' @ 192.168.1.102:50142 > saved useragent "zoiper rv2.8.40" peer 9125 [2017-08-22 13:53:33] notice[5095]: chan_sip.c:24558 handle_response_peerpoke: peer '9125' reachable. (17ms / 2000ms) == using sip rtp tos bits 184 == using sip rtp cos mark 5 -- executing [0112617769@from-trunk:1] answer("sip/obitrunk1-0000000d", "") in new stack > 0x1ca50d0 -- probation passed - setting rtp source address 192.168.1.98:16834 -- executing [0112617769@from-trunk:2] agi("sip/obitrunk1-0000000d", "test.py") in new stack -- launched agi script /var/lib/asterisk/agi-bin/test.py args: ['/var/lib/asterisk/agi-bin/test.py'] env line: agi_request: test.py env line: agi_channel: sip/obitrunk1-0000000d env line: agi_language: en env line: a...
Read more