DUVIDA EM VB6
Bom dia, estou fazendo um programa de Importação de Produtos, e tem um calculo muito, muito, muito complexo são umas 30 taxa, tarifas, impostos, N valores, dolar, real,, bom em resumo e muito bravo,, este calculo esta hoje rodando em uma planilha em excel.
Então estava pensando se o VB6 e o Excel são da Microsoft podem se integrar?.
Exemplo: tenho 4 produto que cadastrei no meu programa os codigos são 13001, 13002, 13003, 13004 tem como verificar no excel em uma coluna que eu passar estes codigos, e quando achar o produto trazer o valor que esta na mesma linha mas em outra coluna para o campo valor final do meu programa,,,uso VB6, Access7, ADO.
Caso alguem possa me ajudar, ficaria agradecido pois vai me eliminar uma dor de cabeça enorme,,, Valeu Moçada
Iniciando em Visual Basic, Sql e Access, Obrigado pela ajuda
Então estava pensando se o VB6 e o Excel são da Microsoft podem se integrar?.
Exemplo: tenho 4 produto que cadastrei no meu programa os codigos são 13001, 13002, 13003, 13004 tem como verificar no excel em uma coluna que eu passar estes codigos, e quando achar o produto trazer o valor que esta na mesma linha mas em outra coluna para o campo valor final do meu programa,,,uso VB6, Access7, ADO.
Caso alguem possa me ajudar, ficaria agradecido pois vai me eliminar uma dor de cabeça enorme,,, Valeu Moçada
Iniciando em Visual Basic, Sql e Access, Obrigado pela ajuda
Cara da uma olhada neste post ele mostra como abrir o excel e mesclar umas celulas mas com ele vc pode ler escrever e fazer o que quiser com o excel
http://www.vbmania.com.br/vbmania/vbmforum.php?varMethod=Abrir&varID=215571
http://www.vbmania.com.br/vbmania/vbmforum.php?varMethod=Abrir&varID=215571
Valeu,, mas o problema que eu tenho e como pegar o valor da celula do excell e trazer pro VB6,, e claro que agradeço o processo que vc me enviou de abertura do excell.Caso possa me ajudar com essa tranferencia de dados do Excell e Vb6 agradeceria,,,Obrigado!!
Bom pra vc capturar o que esta escrito na celula seria assim
ExcelS.ActiveSheet.cells(2, "A")
ExcelS.ActiveSheet.cells(2, "A")
Obrigado DanielCPaete, funcionou certinho,,, me ajudou bastante,,Valeu ate+.
Tópico encerrado , respostas não são mais permitidas