如何在vba中将字符串定义为目录

时间:2016-12-27 21:55:59

标签: outlook-vba

我需要设置一个目录,但我需要它是可变的。 在下面的例子中,我想创建一个名为我的电子邮件主题的文件夹。然后设置创建文件夹的路径 使用以下脚本,它不会将我的电子邮件保存到我创建的文件夹中。你能帮忙吗?

N1 = oMail.Subject
On Error Resume Next
MkDir "C:\Users\meti\Desktop\E" & N1
On Error GoTo 0

sPath = "C:\Users\meti\Desktop\E" & N1
Debug.Print sPath & sName
oMail.SaveAs sPath & sName, olMSG

1 个答案:

答案 0 :(得分:0)

感谢所有人,我找到了办法。如果有更好的方法,请给我你的评论,我很感激。

function cleanUpMyDOM(){
    var nodes = document.querySelectorAll("*");
    for(var i = 0; i < nodes.length; i++){
        nodes[i].innerHTML = nodes[i].innerHTML.trim();
        if(!nodes[i].innerHTML)
            nodes[i].className += " blank";
    }
}
window.addEventListener("load", cleanUpMyDOM);