Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Customize Sticky Note form

0 views
Skip to first unread message

Sue Mosher

unread,
May 23, 2001, 11:27:37 AM5/23/01
to
It's not customizable via the user interface. A workaround might be to use a
custom Post form with code that creates a sticky note item, adds your custom
text to it, then displays the new item.

Or, it might be possible to create the item using code as above, then add
more code to publish it programmatically.
--
Sue Mosher, Outlook MVP
Author of
Teach Yourself Microsoft Outlook 2000 Programming in 24 Hours
Microsoft Outlook 2000 E-mail and Fax Guide
Outlook and Exchange solutions at http://www.slipstick.com

"StCyMeOrCh" <myn...@hotmail.com> wrote in message
news:uES$$j54AHA.1108@tkmsftngp05...
> Hi,
>
> I want to make a custom sticky note form so that when I bring up a new
one,
> it already has certain fields in it.
>
> If I can't use fiekds, then just plain text will do.
>
> When I go into Design Forms, though, sticky note is not an available
option
> in Standard Forms.
>
> When I scroll down to the the Notes folder and click on ipm.sticknote in
> there, I get an error message saying "that form cannot be displayed"
>
> Can anyone help?
>
> Thanks
>
>
>
>


Sue Mosher

unread,
May 23, 2001, 3:58:15 PM5/23/01
to
Update: A NoteItem has no FormDescription property so you can't publish it.
Here's some sample code, though, that creates the note, then saves it as an
.oft form template:

Set objApp = CreateObject("Outlook.Application")
Set objNS = objApp.GetNamespace("MAPI")
Set objFolderNotes = objNS.GetDefaultFolder(olFolderNotes)
Set objSticky = objApp.CreateItem(olNoteItem)
With objSticky
.Body = "Enter your text here: "
.Color = olGreen
.Height = 200
.Width = 200
.SaveAs "C:\temp\greensticky.oft", olTemplate
End With

--

Sue Mosher, Outlook MVP
Author of
Teach Yourself Microsoft Outlook 2000 Programming in 24 Hours
Microsoft Outlook 2000 E-mail and Fax Guide
Outlook and Exchange solutions at http://www.slipstick.com


"Sue Mosher" <sue...@slipstick.com> wrote in message news:...


> It's not customizable via the user interface. A workaround might be to use
a
> custom Post form with code that creates a sticky note item, adds your
custom
> text to it, then displays the new item.
>
> Or, it might be possible to create the item using code as above, then add
> more code to publish it programmatically.
> --

>

StCyMeOrCh

unread,
May 26, 2001, 10:31:45 AM5/26/01
to
Thanks for your reply.

Unfortunately I don't know how to use code. Is there some application into
which I can simply cut and paste the code you have written and make this
work?

Thanks,

TB

"Sue Mosher" <sue...@slipstick.com> wrote in message

news:OOfNWS84AHA.996@tkmsftngp03...

Sue Mosher

unread,
May 26, 2001, 5:00:39 PM5/26/01
to
Press Alt+F11 to get to Outlook's VBA window, where you can paste this code
into the built-in ThisOutlookSession module. (It's like writing macros in
Word or Excel.) Press F5 to run the code after you paste it and change it to
add your text, color, size, etc. . After you create the .oft file with this
code, you can double-click it any time you need a new note.

--

Sue Mosher, Outlook MVP
Author of
Teach Yourself Microsoft Outlook 2000 Programming in 24 Hours
Microsoft Outlook 2000 E-mail and Fax Guide
Outlook and Exchange solutions at http://www.slipstick.com

"StCyMeOrCh" <myn...@hotmail.com> wrote in message

news:edtGECf5AHA.1956@tkmsftngp04...> Thanks for your reply.


>
> Unfortunately I don't know how to use code. Is there some application
into
> which I can simply cut and paste the code you have written and make this
> work?
>
> Thanks,
>
> TB
>
>
>
> "Sue Mosher" <sue...@slipstick.com> wrote in message
> news:OOfNWS84AHA.996@tkmsftngp03...
> > Update: A NoteItem has no FormDescription property so you can't publish
> it.
> > Here's some sample code, though, that creates the note, then saves it as
> an
> > .oft form template:
> >
> > Set objApp = CreateObject("Outlook.Application")
> > Set objNS = objApp.GetNamespace("MAPI")
> > Set objFolderNotes = objNS.GetDefaultFolder(olFolderNotes)
> > Set objSticky = objApp.CreateItem(olNoteItem)
> > With objSticky
> > .Body = "Enter your text here: "
> > .Color = olGreen
> > .Height = 200
> > .Width = 200
> > .SaveAs "C:\temp\greensticky.oft", olTemplate
> > End With
> >
> >

StCyMeOrCh

unread,
May 27, 2001, 10:28:37 PM5/27/01
to
I did that, and when I click F5, it says the "macros are disabled. please
see help to learn how to enable macros."

Naturally, there is nothing in the index under "enable macros." Help!


"Sue Mosher" <sue...@slipstick.com> wrote in message

news:evlAu0i5AHA.2028@tkmsftngp04...

Sue Mosher

unread,
May 27, 2001, 11:22:07 PM5/27/01
to
Tools | Macro | Security. Medium would be a good choice, since you run this
macro only once to create each new sticky note template.

--
Sue Mosher, Outlook MVP
Author of
Teach Yourself Microsoft Outlook 2000 Programming in 24 Hours
Microsoft Outlook 2000 E-mail and Fax Guide
Outlook and Exchange solutions at http://www.slipstick.com

"StCyMeOrCh" <myn...@hotmail.com> wrote in message

news:#rDVS3x5AHA.1724@tkmsftngp04...

Paul Gibbs

unread,
May 29, 2001, 5:49:03 AM5/29/01
to
A quicker and simpler solution would be to open a new note. Type the text
that you require to appear each time. Pick your colour etc, then go to
FILE>SAVE AS> and pick outlook template as an option underneath the file
name.

Then you can drag the icon onto your shortcut menu to use in future. No code
involved and really simple.

Regards
Paul


"StCyMeOrCh" <myn...@hotmail.com> wrote in message

news:edtGECf5AHA.1956@tkmsftngp04...

Sue Mosher

unread,
May 29, 2001, 7:32:51 AM5/29/01
to
I keep forgetting that the sticky note really does have a File menu. You
just can't find it, because it's not labeled. You have to click the sticky
note icon in the upper left corner.

"Paul Gibbs" <paul...@laserform.com> wrote in message
news:O2$D4YC6AHA.1644@tkmsftngp04...

0 new messages