OK try this, which should change the fields in the item's .Body
:
myForward.SenderEmailAddress = objItem.SenderEmailAddress
myForward.SenderName = objItem.SenderName
'Attempt a simple text replace from Portugese to English
' this should replace the FIRST instance of "De:" and "Para:" and "FWD:" with the English equivalent
myForward.Body = Replace(myForward.Body, "De: ", "From: ", 1, 1)
myForward.Body = Replace(myForward.Body, "Para: ", "To: ", 1, 1)
'Optionally, replace "FW" with Portugese equivalent:
'myForward.Subject = Replace(myForward.Subject, "FW: ", "_REPLACEMENT TEXT_", 1, 1)
myForward.Send