Attribute VB_Name = "Various"

Public Sub ProcessArXiv(myItem As Outlook.MailItem)
    Dim formatter
    Set formatter = CreateObject("arxiv2html.WSC")
    htmlstring = formatter.Format(myItem.Body, Format(myItem.SentOn, "dddd, yy/mm/dd"))
    Set formatter = Nothing
    
    myItem.BodyFormat = olFormatHTML
    myItem.HTMLBody = htmlstring
    myItem.Save
End Sub