SaveAs with Comments

[Sharlene England]

Below is my current code. I would like to pass MyValue to the FILE
COMMENTS.
So that they may be displayed during windows navigation.
How to accomplish this?

'now save as with comments
MyValue = InputBox("Enter any applicable comments", "File Comments")

v = Application.Dialogs(xlDialogSaveAs).Show
If v = False Then
MsgBox ("You pressed cancel, program halted")
End
End If

Thanks.
Sharlene England.