Boa tarde,
estou a tentar criar um código que grava um workbook com um determinado nome:
Windows("Preparação_BD_Macro.xls").Activate
Sheets("Macro").Select
Cd = Range("c25").Value 'caminho destino
fdO = Range("c27").Value 'nome do ficheiro destino
Windows(fdO).Activate
ChDir Cd
ActiveWorkbook.SaveAs Filename:=Cd & "O" & Mid(Cells(300003, 11).Value, 38, 14) & ".xlsx", _
FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
Mas eu queria criar um código que verificasse se essse nome já existe.. se já existir adiciona um "1", "2", "3"... etc à frente do nome do ficheiro
Conseguem ajudar?
Essa explicação não te ajuda?
http://www.ambienteoffice.com.br/office ... ho_existe/
Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.
Gilmar