Página 1 de 1

Mudar de cor da celula com referenica a valor da combobox

Enviado: Sex Out 11, 2019 9:58 am
por pedro_mexico
Boa tarde forum
tenho um formulario com pesquisa em listview e que depois carrega valores nas textbox e combobox para editar,
queria saber se é possivel fazer com que ao receber um determinado texto,neste caso "finalizado"e"Anulado" que é digitalizado na combobox "cmbEstado", a celula grave o valor e mude a cor de fundo da celuna na planilha com verde se for "finalizado" e vermelho se for "Anulado".

ou entao se existe algum codigo para quando em uma coluna(exemplo coluna B) existir um desses textos escritos ele colocar a cor de fundo correcta

o codigo que tenho é o seguinte

Código: Selecionar todos

Private Sub btn_Editar_Click()

Dim Plan As Worksheet
Dim Numero 'As Integer
Dim quantidade As Double
Dim linha

Set Plan = Sheets("Historico Manutenções")
linha = 2
Numero = TxtNumero 'codigo

Plan.Select
linha = Plan.Range("A:A").Find(Numero).Row

With Plan

    .Cells(linha, 1) = TxtNumero.Text
    .Cells(linha, 2) = cmbEstado
        
    End With
obrigado