Views

Histats

Vitrine

VBA Excel - Utilize a Propriedade 'Saved' para determinar se o workbook foi alterado.

Inline image 1

PODEMOS DETERMINAR SE ALGUMA ALTERAÇÃO FOI EFETUADA NO WORKBOOK, CHECANDO A PROPRIEDADE SAVED DO WORKBOOK. ESTA PROPRIEDADE RETORNA TRUE OU FALSE DEPENDENDO DA OCORRÊNCIA DE MUDANÇAS NO WORKBOOK.

Note:   Várias condições na sua worksheet, como a presença de funções de volatilidade, podem afetar a propriedade Saved. Funções de Volatilidade são aquelas que são recalculadas a cada momento que uma mudança é implementada na worksheet. Algumas dessas são RAND()NOW()TODAY(), e OFFSET().
O primeiro código mostra uma mensagem quando o workbook ativo foi alterada sem salvar:

  Sub NoSaved()     
  If ActiveWorkbook.Saved = False Then         
  MsgBox "Este workbook contém alterações sem salvar."     
  End If 
  End Sub  
O próximo código fecha o workbook descartando qualquer alteração que tenha sido efetuada nele:

  Sub FechaSemSalvar()     
  Let ThisWorkbook.Saved = True    
  Let ThisWorkbook.Close 
  End Sub  
Neste código abaixo, segue outro código que fecha o workbook e também descarta quaiquer alterações efetuadas:

  Sub FechaSemSalvar2()
  ThisWorkbook.Close SaveChanges:=False 
  End Sub 

Tags: Excel, saved, workbook


LinkWithinBrazilVBAExcelSpecialist

Related Posts Plugin for WordPress, Blogger...