我有一个包含申请者ID、申请日期和职务说明的表。
我试图识别副本,定义为相同的申请者ID在其他申请后3天内申请相同的职务说明。
在同一天,我已经这样做了:
CREATE TABLE Duplicates
SELECT
COUNT (ApplicantID) as ApplicantCount
ApplicantID
ApplicationDate
JobDescription
FROM Applications
GROUP BY ApplicantID,ApplicationDate,JobDescription
-
DELETE FROM Duplicates WHERE
我需要使用截图工具捕捉一些截图,然后复制并粘贴到我的Outlook电子邮件模板中。
当我将图片粘贴到电子邮件模板后,我希望通过单击按钮将图片更改为9cm (255 ps)的宽度。按钮后面的代码将在打开的当前项上运行。
也就是说,代码必须在打开的当前项中运行,并识别图像对象,并运行代码以更改图像的宽度(打开高宽比)。
我已经做了一些代码,如下所示,但我不能让它运行。有人能帮我吗?
附注:我搜索了一下,发现ShapeRange只申请Word、Powerpoint、Excel、Project等。
Option Explicit
Sub ChangeWidth()
Dim objApp As Ou