Action to Append text to Subject in Task? *RESOLVED

[kdrungilas]

I'm looking for a bit of assistance on how to append more text to an existing Subject in an Outlook2000 task. I've successfully written the code to copy an existing open Task, and I can change the Subject, but I want to append the work "copy" to it, not replace it.

Code:
Private Sub copyTask_Click()
Private Sub copyTask_Click()
Dim myolApp As Outlook.Application
Dim myItem As Outlook.TaskItem

Set myolApp = CreateObject("Outlook.Application")
Set myItem = myolApp.ActiveInspector.CurrentItem
Set myCopiedItem = myItem.Copy

With myCopiedItem
.Subject = (" copy")
.Save
End With

Set olookTask = Nothing
Set olookApp = Nothing

End Sub

What do I need to add to my ".Subject = ("copy") line????

[Travis G]

Just a guess, I haven't tried it.


.Subject = .Subject & "(copy)"

[kdrungilas]

:D Wow! That was a FAST answer!

You're right--that worked! Thanks a Bunch!