如何在UperCase中格式化？

Question

我正在尝试从Outlook项目构造文件名。我需要一个UpCase文件名。我有一些代码，但我解决不了。

我正在尝试的是：

Dim msgFileName As String
msgFileName = Format(mySelectedItem.SentOn, "yyyymmdd", ">") & "-" & _
                     mySelectedItem.SentOnBehalfOfName & "-" & _
                     mySelectedItem.To & "-" & _
                     mySelectedItem.Subject

Dim msgFileName As String
msgFileName = Format(mySelectedItem.SentOn, "yyyymmdd") & "-" & _
                     mySelectedItem.SentOnBehalfOfName & "-" & _
                     mySelectedItem.To & "-" & _
                     mySelectedItem.Subject