如何在通过Excel VBA发送的电子邮件中添加外部附件？

Question

我在Excel中有一个VBA，用户可以在其中填写表格，然后单击按钮将其发送到团队电子邮件地址。我希望能够在发送电子邮件之前出现一个框，该框允许用户在发送之前将外部附件附加到电子邮件。

SELECT l.Nachname
FROM Ausleihe as a
LEFT JOIN Leser as l on a.LeserOID = l.LeserOID
JOIN Leser L2 on a.LeserOID = L2.LeserOID
   WHERE l2.Nachname = 'Schmitz'