excel宏 怎样把单元格里的内容（日期），添加到宏里面，求高手指教！！！

我想把a1里的内容当成宏当中路径中的一个量，但是下面中的 MkDir (spath & sn) 提示错误，请教高手应该怎么弄：
Dim i As Integer
Dim sn, spath As String
Dim o As String
o = Range("a1")
spath = "E:\报告\o\"
For i = 3 To 6
sn = Range("a" & i) & "_" & Range("b" & i)
MkDir (spath & sn)
FileCopy "E:\报告.xlsx", spath & sn & "\" & sn & ".xlsx"
Next

spath = "E:\报告\" & o & "\"

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息