Outlook -- Macro Question

[Alex_H]

Hello. I am attempting to write a macro that forwards the current item
(will be appending text to it) to a specified email address and allow
the user to enter in data before it is sent.

I found this example:
Sub CommandButton1_Click()
Set myNameSpace = Application.GetNameSpace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(6)
Set myForward = myFolder.Items(1).Forward
myForward.Recipients.Add "Laura Jennings"
myForward.Send
End Sub
Now, trying this, it is sending the same email everytime (I haven't
worked with vb very much outside of excel macros). I understand that
myNameSpace.GetDefaultFolder(6) is referencing a folder and a specified
email, and I am trying to figure out how to make its end the currently
selected email, and allow for data entry before it is sent.

Thank you.