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
>
>
>
>
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.
> --
>
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, 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
> >
> >
Naturally, there is nothing in the index under "enable macros." Help!
"Sue Mosher" <sue...@slipstick.com> wrote in message
news:evlAu0i5AHA.2028@tkmsftngp04...
"StCyMeOrCh" <myn...@hotmail.com> wrote in message
news:#rDVS3x5AHA.1724@tkmsftngp04...
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...
"Paul Gibbs" <paul...@laserform.com> wrote in message
news:O2$D4YC6AHA.1644@tkmsftngp04...