none
Como alterar a palavra de uma coluna e automaticamente alterar o valor da linha. RRS feed

  • Pergunta

  • Segue abaixo exemplo do que preciso:

     - Tenho na coluna G o titulo Situação, esse titulo recebe 3 palavras no momento do cadastro, sendo elas: EM ANALISE, APROVADO e REPROVADO. Já na coluna I tenho o titulo Valor M.O., esse titulo recebe os valores. Acredito que até essa parte esteja entendido.

     - Porem preciso que quando a coluna G fosse alterada para REPROVADO o valor X (que geralmente é R$15,00) da coluna I fosse alterado para R$ 0,00 automaticamente.

    Isso é possível de ser feito? Se sim, por favor, me ajudem...

    Obrigado pela atenção.

    sábado, 22 de agosto de 2015 01:19

Respostas

  • Oi Felipe

    Pelo o que entendi os valores na coluna I são entrados manualmente.

    E você deseja que caso a Situação seja alterada para REPROVADO, automaticamente o valor correspondente da coluna I seja alterado para 0 (zero)

    Se for isto mesmo, clique com o botão direito na aba da planilha e cole este código no painel à direita

    Private Sub Worksheet_Change(ByVal Target As Range)
        If Target.Count > 1 Then Exit Sub
        
        If Not Intersect(Target, Columns("G:G")) Is Nothing Then
            Application.EnableEvents = False
            If UCase(Target.Value) = "REPROVADO" Then Cells(Target.Row, "I").Value = 0
            Application.EnableEvents = True
        End If
        
    End Sub

    Salve o arquivo como Pasta de Trabalho habilitada para Macro do Excel (.xlsm)

    Espero que ajude

    M.




    segunda-feira, 24 de agosto de 2015 13:59

Todas as Respostas

  • Olá Felipe, 

    Pelo que entendi você pode utilizar a fórmula 'SE'.

    Ela altera o valor de uma célula com base no valor de outra.

    Ex:

    Se(G1 = 'X';0;15)

    Existe um vasto material sobre essa função na internet.

    http://www.aprenderexcel.com.br/2013/tutoriais/funcao-se-

    https://support.office.com/pt-br/article/Fun%C3%A7%C3%A3o-SE-69aed7c9-4e8a-4755-a9bc-aa8bbff73be2?ui=pt-BR&rs=pt-BR&ad=BR

    segunda-feira, 24 de agosto de 2015 11:10
  • Oi Felipe

    Pelo o que entendi os valores na coluna I são entrados manualmente.

    E você deseja que caso a Situação seja alterada para REPROVADO, automaticamente o valor correspondente da coluna I seja alterado para 0 (zero)

    Se for isto mesmo, clique com o botão direito na aba da planilha e cole este código no painel à direita

    Private Sub Worksheet_Change(ByVal Target As Range)
        If Target.Count > 1 Then Exit Sub
        
        If Not Intersect(Target, Columns("G:G")) Is Nothing Then
            Application.EnableEvents = False
            If UCase(Target.Value) = "REPROVADO" Then Cells(Target.Row, "I").Value = 0
            Application.EnableEvents = True
        End If
        
    End Sub

    Salve o arquivo como Pasta de Trabalho habilitada para Macro do Excel (.xlsm)

    Espero que ajude

    M.




    segunda-feira, 24 de agosto de 2015 13:59