Possible to change filename using VBA?

Hello, is it possible to set a filename using VBA with no user prompt during a Macro?

For example, like this:

If filename = standard.xls then do nothing
else if filename != standard.xls then
set filename = standard.xls
end

Any help will be greatly appreciated.