capturing if teh cancel button has been pressed

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

red6000 - 03 Jul 2007 18:10 GMT

hi i have code that displays teh SAVEAS dialog box.

How can i capture if the user presses the cancel button?

Thanks.

Reply to this Message

Jonathan West - 03 Jul 2007 18:21 GMT

> hi i have code that displays teh SAVEAS dialog box.
>
> How can i capture if the user presses the cancel button?
>
> Thanks.

The Display and Show methods return a value that depend on the button
pressed to close the dialog. Look up the methods in the VBA Help for
details.

Signature

Regards
Jonathan West - Word MVP
www.intelligentdocuments.co.uk
Please reply to the newsgroup
Keep your VBA code safe, sign the ClassicVB petition www.classicvb.org

Reply to this Message

red6000 - 03 Jul 2007 18:55 GMT

thanks, that has moved me forward.

It doesn't look like it, but is it possible to pre-populate the saveas
dialog box with different text to the current filename (ie 'temp.doc')?

If aDoc.ReadOnly = True Then
With Dialogs(wdDialogFileSaveAs)
xSave = .Show
End With

Do While xSave = 0
response = MsgBox("You have cancelled
saving the changes. Do you want to save this document? " & aDoc.Name,
vbYesNo)
If response = vbYes Then
With Dialogs(wdDialogFileSaveAs)
xSave = .Show
End With
Else
xSave = 1
End If
Loop
aDoc.Close savechanges:=wdDoNotSaveChanges
End if

>> hi i have code that displays teh SAVEAS dialog box.
>>
[quoted text clipped - 5 lines]
> pressed to close the dialog. Look up the methods in the VBA Help for
> details.

Reply to this Message

Jonathan West - 03 Jul 2007 19:10 GMT

> thanks, that has moved me forward.
>
> It doesn't look like it, but is it possible to pre-populate the saveas
> dialog box with different text to the current filename (ie 'temp.doc')?

Yes.

With Dialogs(wdDialogFileSaveAs)
.Name = "temp.doc" ' can be a full pathname
xSave = .Show
End With

Signature

Regards
Jonathan West - Word MVP
www.intelligentdocuments.co.uk
Please reply to the newsgroup
Keep your VBA code safe, sign the ClassicVB petition www.classicvb.org

Reply to this Message

red6000 - 03 Jul 2007 19:20 GMT

ahh absolutley fantastic. The name property didn;t come up when i press the
'.' in the same way that the show property did, thats why i assumed it
wasn't possible.

Thanks a lot mate. I now how some very specific code that does 100% what I
want (there a lot more to the code than I posted).

Thanks again.

>> thanks, that has moved me forward.
>>
[quoted text clipped - 7 lines]
> xSave = .Show
> End With

Reply to this Message

Jonathan West - 03 Jul 2007 19:54 GMT

> ahh absolutley fantastic. The name property didn;t come up when i press
> the '.' in the same way that the show property did, thats why i assumed it
> wasn't possible.

Many of the properties of dialogs don't, because each dialog is different.
To find out what is available you need to burrow into the Help quite a long
way. In the item on the Dialogs collection, click on the link "Displaying
built-in Word dialog boxes". On that page, click the link "Built-in dialog
box argument lists". There you can see a (relatively) complete list of the
dialogs, and the properties that you can set.

Signature

Regards
Jonathan West - Word MVP
www.intelligentdocuments.co.uk
Please reply to the newsgroup
Keep your VBA code safe, sign the ClassicVB petition www.classicvb.org

Reply to this Message