COMO CALCULAR O ULTIMO DIGITO ?

USUARIO.EXCLUIDOS 14/03/2004 21:20:25
#15372
Ola, pessoal !

Estou precisando de um programa (free ) que faça o seguinte:

1-) Tenho uma relação de códigos em planilha excel com 2.000 registros, em que
preciso saber qual é o último dígito do código.

2-) Exemplo: código do material 445712?

3-) Quem tiver um programa que faça a leitura de código 445712? e grave ao lado 4457129 e vá para o próximo código 727490? e grave 7274904 e assim por diante..., por favor envie para o meu e-mail: marcelo.sena@br.schindler.com ou mpfsena@yahoo.com.br

Conto com força de vocês !
Grato !
Sena
USUARIO.EXCLUIDOS 17/03/2004 15:32:37
#15756
Resposta escolhida
Quanto a ler e gravar o resultado do calculo é simples importe a planilha para uma base de dados, por exemplo ACCESS e crie uma rotina para fazer isso.

imaginemos que vc importou uma planilha e ela virou a tabela material...
com CODIGO e NOME.

daí vc faze uma conexão com a base.

e cria uma rotina, vou explicar o algoritmo.

----------------------------------------------------------------------

1 - move a tabela para o primeiro registro
tabela.movefrist
2 - enquanto não for fim da tabela faça.
while not tabela.EOF
3 - faz o calculo matematico e armazena ele em uma variavel.
calculo = ??? tabela("codigo")
4 - armazena os dados em outra tabela
tabela2("codigo") = calculo
5 - move para o proximo registro até acabar.
tabela.movenext
6 - finaliza o enquanto... etapa 2...
wend

-----------------------------------------------------

Espero ter ajudado.




Tópico encerrado , respostas não são mais permitidas