VBA tornando as células obrigatórias com base na entrada anterior da célula

Question

Existe uma maneira de tornar um número de células obrigatório com base na entrada de uma célula? O conteúdo da célula pode variar.

    

Answer 1

Você criaria um sub "BeforeSave" em sua pasta de trabalho VBA. Para fazer isso:

• Abra o Excel VBA (Alt + F11)
• Clique em ThisWorkbook
• Existem duas barras acima da janela de código, clique na primeira barra e selecione "Pasta de trabalho"
• Clique na segunda barra e clique em "Antes de salvar". Isso preencherá o seu sub para você

Em seguida, adicione o seguinte (Assumindo que a célula 1A seja sua célula de referência e 2A seja obrigatória):

    If Not IsEmpty(Cells(1,1)) Then
       If Cells(2,1).Value = "" Then
          MsgBox "Cell 2A requires user input before saving"
          Cancel = True
       End if
    End if  

Você pode adicionar apenas elses para qualquer outra célula que queira verificar