VBA中使用ActiveWorkbook.SaveAs

我是使用某单元格作为文件名,但是单元格含有\/:*?<>|时,则无法保存,是否有办法保存时自动跳过这些字符?

你可以先把这些字符去除后再保存,我这里是利用正则,例子如下

Sub admin()
    Dim 原字符串 As String
    原字符串 = "*a?b<c>d$"
    With CreateObject("VBSCRIPT.REGEXP")
        .Global = True
        .Pattern = "[*?<>]"
        MsgBox .Replace(原字符串, "")
    End With
End Sub

温馨提示:内容为网友见解,仅供参考
无其他回答
相似回答