在消息框中输入一个数字，然后替换宏中的数字

I have the following macro. When I run the macro I would like a message box to appear asking for file number. That file number would replace the 000 in the macro and the macro would run.I have the following macro. When I run the macr