请问版上高手，我正在试着撰写VBA批量寄送信件。
但Outlook 内有两个帐号，默认为1，但需要用帐号2寄送。
但目前尝试都无法更换，写法如下
Dim oul As Outlook.Application
Dim olkmail As Object
Set olkmail = oul.CreateItem(0)
With olkmail
.SendUsingAccount = oul.Session.Accounts.Item(2)
.Send
End With
想请问语法应该如何撰写？

帐号是物件，要用Set .SendUsingAccount参考微软线上说明文件，里面有范例https://bit.ly/44a6l0y

感谢！有成功写出来了