如何使用VBA excel将图像从桌面粘贴到MS Paint

时间:2017-10-05 08:50:59

标签: excel-vba vba excel

我不知道如何从桌面复制图像并使用VBA EXCEL MACRO将其粘贴到MS绘图中。请帮助完成下面的代码。

Sub PasteImage()

Shell = ("MSPAINT")

Dim ImagePath As String
Dim PAINT As String

    PAINT = "C:\Windows\System32\mspaint.exe"   
    ImagePath = "C:\Users\Admin\Desktop\5841762-image.jpg" 

1 个答案:

答案 0 :(得分:1)

只需添加此

即可
Shell PAINT & " """ & ImagePath & """"