Copiar archivo a una ruta descrita en celda

Buenos días, deseo copiar un archivo a una ruta que se encuentra en una celda, hasta el momento tengo mesto pero no se ejecuta,

Sub EjemploCopiar()
FileCopy "c:\backup\will.bat", "A1"
End Sub