Excel Formatação de celulas vazias

[guilherme.cabrals]

Estou fazendo uma planilha e preciso que caso o usuário apague o valor da celular, vire 0 ao invés de ficar a célula em branco.

Ou que mesmo que não contenha valor algum apareça o R$:

Como faço isso?

[Charley Rocha]

Tente usar este código:

 

Substitua o 2 pela coluna onde você quer ativar o código. Para esse caso, 2 = coluna "B", 3 = coluna "C" etc...

 

O 5 e o 10 representam o intervalo de linhas onde você quer que funcione o código.

 

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 2 Then

    If Target.Row >= 5 And Target.Row <= 10 Then
        If Target.Text = "" Then
            Target.Value = "0"
        End If
    End If
End If

End Sub

Se não souber como usar VBA, siga essas instruções:

 

Aperte Alt+F11 no seu Excel;

Selecione a planilha na qual você quer que esse código funcione. As planilhas serão listadas à esquerda;

cole este código;

Diga se funcionou.

[guilherme.cabrals]

Poxa valeu funcionou. 

 

posso usar este mesmo codigo para manter uma formula na planilha em determinada celula?
 por exemplo 

 

If Target.Column = 3 Then

    If Target.Row == 21
        If Target.Text = "" Then
            Target.Value = "=Soma(B2+B3)"
        End If
    End If
End If

 

[Charley Rocha]

Nesse caso não se utiliza .Value. Ficaria assim:

 

If Target.Column = 3 Then

    If Target.Row == 21
        If Target.Text = "" Then
            Target.FormulaLocal = "=Soma(B2+B3)"
        End If
    End If
End If

Além de o VBA entender como fórmula e não como texto, ele também precisa saber que você está usando uma fórmula do Excel em português, já que a linguagem do VBA é inglês.

 

 

[guilherme.cabrals]

Show valeu por tudo.