FORMATANDO MSFLEXGRID
Ola galera!
Pessoal tem com fazer isso: grid.TextMatrix(0,0)=Format(grid.TextMatrix,"000000"),
mas só que em uma coluna inteira?
tipo selecionar uma coluna inteira e formatar?
grid.row=1
grid.col=0
grid.TextMatrix(0,0)=Format(grid.TextMatrix,"000000")
mas formtando a coluna toda não so um registro
Valeu pela força!
Pessoal tem com fazer isso: grid.TextMatrix(0,0)=Format(grid.TextMatrix,"000000"),
mas só que em uma coluna inteira?
tipo selecionar uma coluna inteira e formatar?
grid.row=1
grid.col=0
grid.TextMatrix(0,0)=Format(grid.TextMatrix,"000000")
mas formtando a coluna toda não so um registro
Valeu pela força!
David, o que o DomLoad disse é verdade, antes de postar algo, de uma pesquisadinha antes...
Tente fazer isso.:
Coloque isso no evento MSFlexGrid1_Click ou adapte de acordo com suas necessidades...qualquer dúvida poste novamente.
Dim Linha As Integer
Dim Coluna As Integer
Coluna = MSFlexGrid1.Col
For Linha = 1 To MSFlexGrid1.Rows
MSFlexGrid1.TextMatrix(Linha, Coluna) = Format(MSFlexGrid1.TextMatrix(Linha, Coluna), "000000")
Next Linha
Acho que deve dar certo
Tente fazer isso.:
Coloque isso no evento MSFlexGrid1_Click ou adapte de acordo com suas necessidades...qualquer dúvida poste novamente.
Dim Linha As Integer
Dim Coluna As Integer
Coluna = MSFlexGrid1.Col
For Linha = 1 To MSFlexGrid1.Rows
MSFlexGrid1.TextMatrix(Linha, Coluna) = Format(MSFlexGrid1.TextMatrix(Linha, Coluna), "000000")
Next Linha
Acho que deve dar certo
Perdão, prometo que vou me policiar mais, mas eu não queira colocar direto na celula queria fazer atravez de uma seleção, ou então que fosse atravez de uma variavel que tb não consegui.
Assim:
dim vFormato as string
Ex: vFormato = "000000" (formato esta gravado numa tabela)
MSFlexGrid1.TextMatrix(Linha, Coluna) = Format(MSFlexGrid1.TextMatrix(Linha, Coluna)," & vFormato & ")
mas desse jeito não consegui, porisso queria tentar fazer na coluna toda
Estou tentando montar uma classe que carrega um msflexgrid com registros, formatando, alinhando, etc. E esses dados estão numa tabela,ou seja, pra cada tabela eu faço um registro de propriedades da mesma, tamanho do campo, alinhamento, texto padrão, etc, dai a necessidade de carregar a variavel (vFormato), mas assim não ta dando certo acho que não suporta, porisso queria fazer na seleção dos registros, desculpa se ta meio confuso.
Assim:
dim vFormato as string
Ex: vFormato = "000000" (formato esta gravado numa tabela)
MSFlexGrid1.TextMatrix(Linha, Coluna) = Format(MSFlexGrid1.TextMatrix(Linha, Coluna)," & vFormato & ")
mas desse jeito não consegui, porisso queria tentar fazer na coluna toda
Estou tentando montar uma classe que carrega um msflexgrid com registros, formatando, alinhando, etc. E esses dados estão numa tabela,ou seja, pra cada tabela eu faço um registro de propriedades da mesma, tamanho do campo, alinhamento, texto padrão, etc, dai a necessidade de carregar a variavel (vFormato), mas assim não ta dando certo acho que não suporta, porisso queria fazer na seleção dos registros, desculpa se ta meio confuso.
Citação:Ex: vFormato = [Ãâ€ÂÂ]000000[Ãâ€ÂÂ] (formato esta gravado numa tabela)
O correto para este formato é:
vFormato = "######000000"
MSFlexGrid1.TextMatrix(Linha, Coluna) = Format(MSFlexGrid1.TextMatrix(Linha, Coluna), vFormato)
Assim ele formata o nº 10 para 000010.
Não esqueça de finalizar o tópico.
Tópico encerrado , respostas não são mais permitidas