Monday, February 18, 2013

Changing the Outlook Notes into Text Files


Many ways to keep little notes (small does not mean not important, instead it can be very important), such as by using his Notes MS (Microsoft) Outlook.

Which will be discussed in this post is how to convert or modify the Notes or records into txt file.

Immediately, :)

Create a new folder to save the text file for example on drive C: \ with the name of the folder notes
Run Ms Outlook.


After the outlook window appears, press the Alt + F11, it will display the Microsoft Visual Basic Project


Click on the Insert menu, and then click Module



Module window will appear, copy and paste the code below:
Sub NotesToText()     Set myNote = Application.GetNamespace("MAPI").PickFolder     For cnt = 1 To myNote.Items.Count         noteName = Replace(Replace(myNote.Items(cnt).Subject,
        myNote.Items(cnt).SaveAs "c:\notes\" & noteName & ".txt", OlSaveAsType.olTXT     Next End Sub
Adjust the red folder names according to the location and name of the folder you created in the first step

click on image to enlarge.


Select the Run menu, then click on the Run Sub / Useform

Select the Notes folder, click OK

Close / exit of Microsoft Visual Basic, and Microsoft Outlook.
There will be a notification whether to save a Visual Basic project, gyre NO (not saved).

Now please check the folder that you created earlier, already contains text files.


Hopefully useful.