Sub メール画面表示マクロ() Dim outlookApp As Object Dim outlookMail As Object Dim ws As Worksheet Dim mailSheet As Worksheet Dim addrList As Range Dim cell As Range Dim recipients As String Dim title As String Dim body As String ' Outlook…