Email Confirmation from PowerPoint.

I wonder if your presentation somehow got corrupted. However, you said
that you tried starting from scratch and had the same problem. If you
have coded in Access, then you know that VBA is not very talkative so
stupid little things can cause the whole thing to stop working, but
taking out a letter and putting it back shouldn't have that effect. The
only suggestions I have left are to assume that either your presentation
is corrupted or PowerPoint itself is corrupted. Have you tried Help
Detect and Repair? Have your tried compiling your code after you make a
change? I'm grasping at straws now. I wonder if someone else has a better
idea.
--David

--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.PowerfulPowerPoint.com/

=?Utf-8?B?bWlzc2NyZg==?= wrote in
:

Thank you for your response. I apologize for this delay in
responding. I tried moving that up. I even tried removing all
commenting. The thing I don't get is, if I make a ppt from scratch,
and put the code on a command button, it works. If I edit the code at
all, even if I put it back exactly as it was (take out 1 letter and
put it back) the code no longer works. When I say it doesn't work, I
mean, go to presentation mode, click the button (named CommandButton1)
and nothing will happen. Even with this code behind it:

Private Sub CommandButton1_Click()
Dim objOutlook As Object 'Outlook.Application
Dim objOutlookMsg As Object 'Outlook.MailItem
Dim objOutlookRecip As Object 'Outlook.Recipient

Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(0)

With objOutlookMsg
Set objOutlookRecip = ")
objOutlookRecip.Type = 1
.Subject = Me.TextBox1.Value & " has completed the Unlawful
Harrassment
Orientation"
.Save
.Send

End With
End Sub
------------------

Are you experienced in dealing with coding in powerpoint? I could
really use some help understanding why mircosoft made this so
difficult. I create access applications all the time, with no
problem. What works there, just doesnt work here. grrr. lol

Thanks for your continued help.

All of your suggestions make sense. The odd thing is that I have copied the
presentation. Remade a new one, and the same thing will still happen. I
have also been doing this on more than one computer. Here is the only thing.
one is 2003, the other is xp. Anyway. I am at a loss. I just created a
new slide and deleted the old one. Looking at my code above, I don't see why
yhtat wouldnt work. It still doesn't.

If I can just get that to work, it would be really nice!

Thanks,

Ahhh!!! I figured it out! My macro security somehow got set to high. lol.
I changed it to low, and now it works. omg.

I tested the textbox1.value = "" instead of null and it worked!

Thank you!

It's always the stupid little things with VBA. I'm glad you figured it out.
--David

--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.PowerfulPowerPoint.com/

=?Utf-8?B?bWlzc2NyZg==?= wrote in
:

Ahhh!!! I figured it out! My macro security somehow got set to high.
lol. I changed it to low, and now it works. omg.

I tested the textbox1.value = "" instead of null and it worked!

Thank you!