MSFLEXGRID, HELP ME
Como faço para colorir um linha do MSFLEXGRID de uma vez?
tenta
Dúvida sanada
Tópico encerrado!
tchauu
Private Sub Command2_Click()
Dim lLinha As Long
MSFlexGrid1.Col = 3
For lLinha = 1 To MSFlexGrid1.Rows - 1
MSFlexGrid1.Row = lLinha
MSFlexGrid1.CellBackColor = vbBlue
Next
End Sub
Dúvida sanada
Tópico encerrado!
tchauu
Desta forma ele mudar a cor somente do celula seleciona, gostaria de saber uma forma de trocar as cores de todas as celulas da minha atual.
Uéééé... para mudar de todas as celular do FLEXGRID1
é isso?
MSFlexGrid1.BackColor = vbRedé isso?
Com o BackColor, ele vai colorir todas as celulas e linha do grid.
quero colorir todas as celulas da linha selecionada
quero colorir todas as celulas da linha selecionada
Ahhh tá... pintar a linha inteira selecionada... agora sim
rssrs
Não se esqueça de encerrar o TÓ“PICO..
rssrs
Dim lLinha As Long
For lLinha = 1 To MSFlexGrid1.Cols - 1
MSFlexGrid1.Col = lLinha
MSFlexGrid1.CellBackColor = vbBlue
Next
Não se esqueça de encerrar o TÓ“PICO..
Esta maneira funciona, porem fica muito lento, gostaria de saber se ha alguma maineira de colorir a linha toda de uma so vez.
Não existe amigo!!! Só através de LOOPING!
Ok?
Ok?
Ps: no meu PROJETO... tem uns 40 campos...... e funciona rapidinho.... menos de 1 SEGUNDO pinta a linha inteira..
Mas imagine so vc tem 1Milhão de registro com quarenta campos, ele vai fazer 1 milhão de loop?
Entedeu?
Entedeu?
Mas você pediu para colorir somente a linha SELECIONADA, e não 1 milhão de linhas... entendeu?
Tópico encerrado , respostas não são mais permitidas