This may be like giving a box of matches to a three-year-old, but I thank you anyway.
Keith Purtell, Web/Network Administrator VantageMed Operations (Kansas City) Email: [EMAIL PROTECTED] CONFIDENTIALITY NOTICE: This email message, including any attachments, is for the sole use of the intended recipient(s) and may contain confidential and privileged information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply email and destroy all copies of the original message. > -----Original Message----- > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] > Behalf Of Ellis, Randy > Sent: Wednesday, August 27, 2003 8:19 AM > To: '[EMAIL PROTECTED]' > Subject: RE: [KCFusion] OT: Desktop automation text transfer > > > Try using VBA in Excel, Word, or possibly Outlook. > > Excel Macro example: > > Sub GetEmails() > > Dim myApp As New Outlook.Application > Dim myNS As NameSpace > Dim myFolder As MAPIFolder > Dim myItems As Items > Dim intLoopCounter As Integer, Idx As Integer > > Set myNS = myApp.GetNamespace("MAPI") > Set myFolder = myNS.GetDefaultFolder(olFolderInbox) > Set myItems = myFolder.Items > > Range("a1").Value = "Subject" > Range("b1").Value = "Body" > Idx = 2 > For intLoopCounter = 1 To myItems.Count > Range("a" & Idx).Value = myItems(intLoopCounter).Subject > Range("b" & Idx).Value = myItems(intLoopCounter).Body > Idx = Idx + 1 > Next intLoopCounter > > Set myNS = Nothing > Set myFolder = Nothing > Set myItems = Nothing > > End Sub > > This will grab every email in your default email inbox and > place the subject > and body into separate rows within an excel spreadsheet. You > could add some > logic to search thru the body text and grab what you want. > > Randy Ellis > Senior Programmer Analyst > City of Overland Park > > > -----Original Message----- > From: Keith Purtell [mailto:[EMAIL PROTECTED] > Sent: Tuesday, August 26, 2003 4:09 PM > To: KCFusion (E-mail) > Subject: [KCFusion] OT: Desktop automation text transfer > > > Off topic, but I'm looking to see if a certain tool exists. I > have a weekly > task where I have to > sort through Outlook email messages, then copy and paste the > content from > them into a plain text > file. I want to speed this up with some desktop automation. > Ideally, I'd > like to click on a function > key (or key combination) and have Windows automatically copy > the Outlook > text to the target > document, where it would be appended. Is there such an animal? > > Keith Purtell, Web/Network Administrator > VantageMed Operations (Kansas City) > Email: [EMAIL PROTECTED] > --- [This E-mail scanned for viruses by Declude Virus] ______________________________________________________________________ The KCFusion.org list and website is hosted by Humankind Systems, Inc. List Archives........ http://www.mail-archive.com/[EMAIL PROTECTED] Questions, Comments or Glowing Praise.. mailto:[EMAIL PROTECTED] To Subscribe.................... mailto:[EMAIL PROTECTED] To Unsubscribe................ mailto:[EMAIL PROTECTED]
