ERRO AO CARREGAR UM NUMERO DO EXCEL PARA O VB6

FERRUBIM 10/02/2015 14:31:59
#444428
poderíam me ajudar no seguinte:
tenho que carregar no vb6 informações de uma planilha em excel, porém tem um campo por exemplo que está com esse conteudo 719000070720322000 ... ao carregar no vb6 ele fica 7,19000070720322E+17 ...como faço para carregar e ficar correto ???

a rotina que uso é essa:

dim WL_NR_CONTRATO_EXCEL as string

wl_letra = [Ô]A[Ô]
Excel.Range(Trim(wl_letra) & WL_cont_coluna).Select
WL_NR_CONTRATO_EXCEL = Trim(Excel.ActiveCell.Value)
PEGUDO 10/02/2015 15:00:35
#444429
Tente ver na sua planilha Excel como a célula está configurada.
Geralmente ela vem configurada como [Ô][txt-color=#0000f0]Geral[/txt-color][Ô]. Desta forma, o Excel pode modificar o valor da célula, automaticamente, de acordo com o conteúdo. Tente mudar para [Ô][txt-color=#0000f0]Texto[/txt-color][Ô].

Outra coisa importantíssima:
Não utilize variáveis com todos as letras em maiúsculo. Em programação, variáveis em maiúsculos são designadas para constantes [Ô][txt-color=#0000f0]Const[/txt-color][Ô] ou [Ô][txt-color=#0000f0]Enum[/txt-color][Ô].
Use a capitulação, tipo wl_nr_Contrato_Excel
FERRUBIM 10/02/2015 15:04:15
#444430
ja tentei passar para texto,mas quando coloco no excel ele fica 1,60102E+16 por exemplo...
PEGUDO 10/02/2015 15:21:17
#444432
Tenta colocar [Ô]Número[Ô] ou [Ô]Fração[Ô].
Obs. Pode ser que com [Ô]Número[Ô] ele retorne vírgula também
FERRUBIM 10/02/2015 15:27:06
#444433
fica com virgula tbem...putz..
PEGUDO 10/02/2015 16:02:07
#444435
Cara,
Faz um tratamento no retorno e retira a vírgula antes de pegar o valor
MARCELO.TREZE 10/02/2015 23:35:18
#444447 Resposta escolhida
ja tentou isso

WL_NR_CONTRATO_EXCEL = [txt-color=#0000f0]CStr([/txt-color]Excel.ActiveCell.Value[txt-color=#0000f0])[/txt-color]
Tópico encerrado , respostas não são mais permitidas
Voltar