Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
ola boa tarde tenho uma tabela em access chamada nota onde listo as notas geradas ,estou utilizando a cod seguinte
For iLinha = 0 To flexNotas.Cols - 1 'Varre todo o Grid
flexNotas.Col = iLinha 'Posiciona na Coluna Desejada
flexNotas.Row = 1 'Posiciona na Linha Desejada
If flexNotas.TextMatrix(iLinha, flexNotas.Cols - 2) = "C" Then 'Verifica o Texto da Célula
flexNotas.CellBackColor = vbRed 'Muda a Cor do Fundo
flexNotas.CellForeColor = vbBlack 'Muda a Cor da Letra
Else
flexNotas.CellBackColor = vbBlue 'Muda a Cor do Fundo
flexNotas.CellForeColor = vbBlack 'Muda a Cor da Letra
End If
Next
so que eu varro todo o grid e ele verifica o que esta com status="C" ate ai ok mas somente deixa em vermelho a linha 1 tentei fazer um outro for next para varrer as linhas mas não deu .se eu trocar aqui para For iLinha = 1 To flexNotas.row - 1 'Varre todo o Grid por linha ele não pinta toda a linha pinta somente a coluna 0 algum pode me ajuadar.
Carregando comentários...