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]
