COLUNA MSHFLEX

NETVOO 27/10/2009 22:22:30
#326394

Boa noite a todos pessoal to tentando somar uma coluna mas não da valor certo tentei algo assim mas ele soma somente a primeira linha 2x

txtTotalPagar = Val(MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 7)) + Val(MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 7))


aproveitando como estou falando de numeros, to na captura de como colocar todos os numeros como casas assim 4,8637

igual valor de posto de gasolina que fala R$ 3,337 trez reais e quase 38 centavos
MARCELO.TREZE 28/10/2009 11:04:20
#326430 Resposta escolhida
Desta Forma Colega

With MSFlexgrid1
Dim Valor As Double
Valor = 0
For R = 1 To .Rows - 1
Valor = Valor + CDbl(.TextMatrix(R, 7))
Next R
txtTotalPagar.Text  = Format(Valor, [Ô]Currency[Ô])
End With
NETVOO 28/10/2009 22:05:54
#326487
valew muito obrigado.
Tópico encerrado , respostas não são mais permitidas
Voltar