Fala Galera!
Fiz uma macro para copiar os dados de uma aba (Orçamento) para uma nova aba e renomear esta nova aba de acordo com a célula C2 da aba Orçamento. Funciona perfeito, o problema é que quando crio uma vez, se clico novamente no botão gravar sem alterar a célula C2 dá erro porque já existe uma aba com o nome criado. Já vi algumas opções mas não consegui adaptar pois sou inciante em macro. O que preciso é que haja uma verificação se este nome existe e mostre uma mensagem de erro para alterar a célula C2. Segue abaixo o que fiz, caso saiba como ajustar eu agradeço.
If Sheets("Orçamento").[C2] = "" Then
MsgBox "É obrigatório preencher o campo contratante!"
Else
Cells.Select
Selection.Copy
Sheets.Add After:=Sheets(Sheets.Count)
Selection.PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone _
, SkipBlanks:=False, Transpose:=False
ActiveWindow.Zoom = 90
ActiveWindow.DisplayGridlines = False
Set Target = Range("C2")
ActiveSheet.Name = Left(Target, 31)