COMO MVER O FOCU PARA O ULTIMO REGISTRO MSFLEXGRID
Pode ser uma pergunta primária e tola, mas estou tão de cabeça quente, com o atraso do projeto que já não estou entendendo mais nada....rs.
Mas como faço para mover o focu da minha FlexMandado, para o último registro, assim que o formulário se abre....?
para conectar ao banco de dados uso a seguinte função no Form_Load
Private Sub Form_Load()
AbreBD
Set MA = DB.OpenRecordset([Ô]Select * FROM Mandados ORDER BY Codigo[Ô])
Set Data1.Recordset = MA
Call AtualizarFlexMandado
Data1.Refresh
End Sub
tentei colocar no Form_Load, após estes códigos o seguinte (para mover para o último registro)
If ma.recordcount >= 1 then
data1.refresh
Call AtualizarFlexMandado
MA.MoveLast
end if
Mas acontece que não move....
O que devo fazer, o o que ainda não raciocinei?
Mas como faço para mover o focu da minha FlexMandado, para o último registro, assim que o formulário se abre....?
para conectar ao banco de dados uso a seguinte função no Form_Load
Private Sub Form_Load()
AbreBD
Set MA = DB.OpenRecordset([Ô]Select * FROM Mandados ORDER BY Codigo[Ô])
Set Data1.Recordset = MA
Call AtualizarFlexMandado
Data1.Refresh
End Sub
tentei colocar no Form_Load, após estes códigos o seguinte (para mover para o último registro)
If ma.recordcount >= 1 then
data1.refresh
Call AtualizarFlexMandado
MA.MoveLast
end if
Mas acontece que não move....
O que devo fazer, o o que ainda não raciocinei?
se for msflexgrid
nomedaflex.row = noedaflex.rows -1
nomedaflex.col = 0
Primeira coluna da última linha da grid
. . .
Parabéns, exatamente... moveu.. porém o [Ô]azul[Ô] de selecionado não apareceu.. como faço???
Que azul mano, tu não falou que precisava de azul, mas vamos lá;
mude a propriedade BackColorSel da sua grid pra azul, que em qualquer célula que tu clicar vai ficar azul
. . .
Desculpe se não mencionei..
mas o azul é o da seleção....e não o de fundo...
mas o azul é o da seleção....e não o de fundo...
Explica melhor o que tu quer coma a seleção e vamos ver
ele quer simular um click na ultima linha do grid
faça isso pra marcar a linha
grid.Col = 0
grid.ColSel = grid.Cols - 1
faça isso pra marcar a linha
grid.Col = 0
grid.ColSel = grid.Cols - 1
VLW...
Blz . . .
Tópico encerrado , respostas não são mais permitidas