我不确定我的代码不喜欢这里的什么，我在 .NET 方面有经验，但 VBA 对我来说是新的。我知道何时调用函数不执行 myFunction('args') 而是执行 myFunction args，但我在这里没有这个问题。任何帮助表示赞赏。谢谢！
Public Sub LogMeIn()
Dim item As Outlook.MailItem
Dim body As String
Dim subject As String
Dim oFld As Outlook.Folder
Dim oNS As Outlook.NameSpace
Dim oMails As Outlook.items
Dim oProp As Outlook.PropertyPage
Dim mySelection As Word.Selection
Dim strItem As String
Dim omailitem As Variant
Set oNS = Application.GetNamespace("MAPI")
Set oFld = oNS.GetDefaultFolder(olFolderInbox)
Set oMails = oFld.items
For Each omailitem In oMails
Set body = omailitem.body
Set subject = omailitem.subject
Dim pos As …