Eliminar barras de nomes de arquivo ao salvar com macro - dicas do Excel

Deepak pergunta:

Oi, estou tentando atribuir a data atual a uma célula A38 usando =NOW()e, em seguida, fazer um SaveAs atribuindo o conteúdo dessa célula como o nome do arquivo para o arquivo que está sendo salvo. Não estou conseguindo escrever o código correto para ele.

ChDir "C:Backup" ActiveWorkbook.SaveAs Filename: = Range("A38").Text, FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False

No código mencionado acima, tudo o que preciso fazer é substituir o nome do arquivo pelo conteúdo de uma célula A38 que sempre conterá a data atual. Eu apreciaria se você pudesse me informar a maneira correta de escrever este código. Tentei substituir o Filename por algumas coisas olhando tip025 em www.mrexcel.com, mas não funcionou.

O problema surge quando o formato da data inclui o caractere “/” … tente o seguinte:

ActiveWorkbook.SaveAs Application.Substitute(Range(“A38”).Text,”/”,”-“)