COLORIR LINHAS MSHFLEXGRID DE ACORDO COM CRITERIOS

SAMUKA 31/07/2013 16:55:40
#426803
CLEBERBALMEIDA, como eu já tinha te falado anteiormente o erro tá na coluna selecionada.

Vc está se referindo como se fosse a coluna 6 e na verdade é a coluna 7
OMAR2011 31/07/2013 16:57:13
#426804
Verifica o Email.
SAMUKA 31/07/2013 16:59:57
#426806 

               If .TextMatrix(iL, 7) = [Ô]Sim[Ô] Then
                    .CellBackColor = &HFF&
                ElseIf .TextMatrix(iL, 7) = [Ô]Não[Ô] Then
                    .CellBackColor = &HFF0000
                End If
CLEBERBALMEIDA 31/07/2013 17:21:32
#426809
Omar e Samuka, obrigado pela ajuda, vou testar e volto a informar a vocês...
CLEBERBALMEIDA 01/08/2013 08:42:33
#426827
Omar e Samuka, muito obrigado, já consegui resolver, se vocês precisarem de alguma coisa e eu puder ajudar, terei o prazer.

O código ficou assim, coloquei para não colorir a primeira coluna, que é a fixa.

Dim iL As Integer, iC As Integer
With Grid
For iL = 1 To .Rows - 1
For iC = 1 To .Cols - 1
.Col = iC
.Row = iL
If .TextMatrix(.Row, 7) = [Ô]Não[Ô] Then
.CellForeColor = vbRed
End If
Next iC
Next iL
End With

Abraços!
OMAR2011 01/08/2013 09:02:42
#426833
Esqueceu de encerrar após ter conseguido resolver a dúvida.
Valeu.
Página 2 de 2 [16 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar