Replies

Of course, it did seem too easy.

I’m sure someone else will chime in and offer some code to do what you want. Until then, would it be possible just to add the Options… menu item to a button on a custom toolbar for a message?

Just right-click a toolbar, and click Customize… Then select the Commands tab, choose View from the Categories pane, and click and drag Options from the Commands pane to a toolbar of your choosing.

This will put you one click away from being able to disable/change your sent item destination.

Hi Al,
I might be missing the real purpose for your question, but why not just disable the functionality right from within Tools | Options…?
Click on Email Options…, and then uncheck the box labeled ‘Save copies of messages in Sent Items folder’.

This will turn off the constant saving of sent emails.

HTH

—Edited to add the cute little picture—

Try this:
Once you’re finally In Word (I’m using Word97) via the mail merge command in Outlook, Click Insert Word Field > If…Then…Else… and fill in the criteria supplied in my attached picture. It seems to work for me, with my standard Outlook Nickname and First_Name fields.

To get the MERGEFIELDs into the separate boxes, press Ctrl-F9 to get the braces {}, and type in ‘MERGEFIELD xxxxx’, where xxxxx is the field you want inserted.

HTHEdited to show how to include the MERGEFIELDs into the dialog box

I’m a little bit confused – perhaps you can clarify.
Which is the formula that you want to have in B7:
=SUM(B1:B3)-SUM(B4:B6)
OR
=SUM(B1:B4)-SUM(B4:B6)
And, given the data you supplied in your first post, what is the result that you expect?
I don’t quite understand the auto change that you’re talking about .

Going with what you already have, is this what you’re looking for?

Sub TestSave()
    Dim FileName As String
'This pulls the name from your 'AnyFormField' field
    FileName = ActiveDocument.FormFields("AnyFormField").Result    
'Show the SaveAs dialog box
    With Dialogs(wdDialogFileSaveAs)
'with your suggested filename
        .Name = FileName & ".doc"
        .Show
    End With
End Sub

Looking at your formulas, the formula for cell B7 is:

=SUM(B1:B4)-(SUM(B4:B6)

So, it’s automatically subtracting the value of cell B4 from the equation as soon as it is added, yielding the same as the sum of B1:B3.
(4+5+5+45)-(45) = (4+5+5)

Perhaps you meant to use:

=SUM(B1:B3)-(SUM(B4:B6)

HTH

Great tip! This is going in my ‘ Cool Tips ‘ file.

Here’s an update if you’re interested.

Doesn’t matter that they say they’re 2 Meg diskettes. They were formatted on a macintosh, so I’ll just fire up one of the Macs I have laying around to explore the files — which, FYI — date back to 1993. Not bad for floppy disk longevity!

Have a good one!

It seems to me that the link should be to HTTP://www.ohiomoose.com instead of file://www.ohiomoose.com. This isn’t a problem that you can really fix, aside from knowing it’ll cause problems.

Perhaps the person who produces the newsletter can double-check and verify that ‘FILE’ is what is supposed to be there.

You can take a look here. I believe it does what you want.

Good luck!

Edited by smerdonk on 13-Jun-02 14:25.

Do you have a file called ‘Normal.dot’? If you can’t find it on your computer, look for ‘~$normal’, and see if that returns any hits. Sounds to me like your default template is bad/missing.

You could buy support — but why not just upgrade to the next version? The ‘no help’ help should be available in .NET.

So, there are no modules in the project. Is there any code in ThisDocument? I made a quick file that had ONLY :

Private Sub Document_Open()

End Sub

And THAT triggered the macro virus warning.

You CAN change the color of the scroll bars, but like the scheme, it changes more than just the scroll bar. Scroll bars are part of the 3d Objects in the appearance tab. Have a look.

It means that Visual Basic has no information in it’s help file for a particular keyword.

Yes, I’m being dense on purpose . Seriously, though. Don’t click the ‘Help’ button, or you’ll be stuck in an n-th complexity infinite binary loop!

Good Luck!