嗨,我正在尝试使用 VBA 解压缩文件,但出现运行时错误 91。这是我的代码:
Dim Destino As String
Dim Origen As String
Dim oAplica As Object
Destino = "C:\Users\Oscar Mayorga\Downloads"
Origen = "C:\Users\Oscar Mayorga\Downloads\PD20210822.zip"
Set oAplica = CreateObject("Shell.Application")
oAplica.Namespace(Destino).CopyHere oAplica.Namespace(Origen).Items
Run Code Online (Sandbox Code Playgroud)
知道发生了什么吗?非常感谢