VBA开始要求标注之前未使用过的代码中先前未标注的变量的尺寸

编程问答 2022-08-14

问题描述

我有一个例程，可以从合并的副本中复制excel文件。这些复制的excel文件由工作表中的名称列表命名。我使用“ for”功能在一个工作表中从名字到列表中的最后一个名字的一个循环中进行操作。去年我使用了代码，而vba并没有要求声明所有变量。现在，当我尝试使用它时，它开始要求我声明。我声明了，但是代码中找不到我找不到答案的东西，而vba给了我一个msgbox：

“对象变量或未设置块变量” 。

我从没读过类似的东西。请按照下面的代码以及出现问题的那一行：


Application.DisplayAlerts = False

Dim destino As String,gestor,Arquivo2
Dim Arquivo As Workbook
Dim UltimaLinhaGestor As Integer,i,UltimaLinhaBases,UltimaLinhaArquivo,CC


CC = 8

destino = "C:\Users\arno\Documents\"
UltimaLinhaGestor = Sheets("Farol").Cells(Rows.Count,CC).End(xlUp).Row
    
    For i = 3 To UltimaLinhaGestor
        gestor = ThisWorkbook.Sheets("Farol").Cells(i,CC).Value
        
'##########     HERE     ##########
        Arquivo = "Orçamento 2021 - " & gestor
'##########     HERE     ##########       
 
        ThisWorkbook.SaveCopyAs (destino & Arquivo & ".xlsm")
        
        Workbooks.Open (destino & Arquivo & ".xlsm"),False
            
        Workbooks(Arquivo).Activate

    Next i```

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

declareexcelexcelobjectobjectvariables