0

標題どおり、スクリプトに以下のように入力しましたが、うまく実行できません。

コードに誤りがあると思われますが、どう訂正したらよいか分からず、困っています。

知識不足なので、アドバイスをぜひお願いします。

Sub

Dim objIns As Inspector
Dim objItem As Object
Dim objAttchments As Object
SetUMSVariable $添付ファイル件数$,0

Set objIns = Application.ActiveInspector
Set objItem = objIns.CurrentItem '今開いているメールオブジェクトを取得
Set objAttchments = objItem.Attachments ’Attachmentsコレクションを取得

SetUMSVariable $添付ファイル件数$, objAttchments.Count 'MyAttachments

End sub

この質問は解決済みのためクローズされています。
yu ベストアンサーとして選択しました
回答とコメントは、会員登録(無料)で閲覧できるようになります。