Excel VBA从文件名每天不断更改的URL下载文件

有人能帮我拔头发吗。我正在尝试从一个站点下载一个文件并将其复制到另一个位置。如果我使用下面注释掉的实际文件名，它就会工作。遗憾的是，文件名每天都在变化&我已经在B1单元（01 04 2016）中说明了这一点。无论如何，我得到了一个错误“compileerror:Constant expression required”，并突出显示了第一个“&”。有人有什么想法可以帮助你吗

{

}

编译错误：需要常量表达式

不能将

Const

与

变量一起使用。当您使用
Const
时，请传递一些不变的内容。比如说

Const a = "Sid" '<~~~ This will work
Const a = "Sid" & i '<~~ This will not work. i is a variable
Const a = "Sid" & Range("A1").Value  '<~~ This will not work. Range("A1") is a variable

Const strUrl As String=”https://test.com/sites/Field 报告的完井量“&范围（“B1”）和“.xlsb”
。正如编译器所说，常量是必需的，
Range（）
不允许将其视为字符串。然后，您可以使用
range（）
将saveas和ranges中的日期分配给itSee。我原以为您拥有它，但现在我对此很高兴。我真的很挣扎！！！如果我使用MsgBox““报告的完工情况”和工作表（“Sheet1”）.Range（“B1”）和“.xlsb”进行检查，则格式似乎正确。我刚刚意识到@ksheon已经在上面的评论中提出了这一点。请不要接受这个答案。让他回答这个问题，然后你就可以接受他的回答：）
Const a = "Sid" '<~~~ This will work
Const a = "Sid" & i '<~~ This will not work. i is a variable
Const a = "Sid" & Range("A1").Value  '<~~ This will not work. Range("A1") is a variable

Dim strUrl As String

'"https://test.com/sites/Field Completions Reported 01 04 2016.xlsb"
strUrl = "https://test.com/sites/Field Completions Reported " & _
         Range("B1").Value & ".xlsb"