Visual Basic et Excel

Question

Bonjour tout le monde

Je suis face a un probleme j'ai creer une application Visual Basic qui va chercher des donn&#233;e dans une base SQL Server et les envoie dans un fichier excel.
Le probleme c que J ARRIVE PAS A ENVOYER DES DONNES AU FORMAT DOUBLE OU MONETAIRE, je peux envoyer des entier et des string mais pas de double et long et currency pour envoyer les donn&#233;es j'utilise l'instruction WriteLine : voici un exmple

a.writeLine "C;Y" & Ligne & ";X23;K" & qty_sg

Le probleme c que ca marche pas si qty_sg est un Double ou un  Currency, vb envoie la valeur dans la feuille excel mais excel n'arrive pas &#224; lire la cellule

Merci d'avance

saharbiahmed · Answer

VITAMINE A

salut
je pense cette exemple vous sera utile

   Dim xls As Excel.Application
    Dim x As Double
    
    x = 125111521.125541   ' a titre d'exemple
    
    Set xls = CreateObject("Excel.application")
    xls.Visible = True
    
    
    xls.Workbooks.Open "c:\NomDeFichierExcel.xls"
    xls.ActiveWorkbook.ActiveSheet.Range("a1").Value = x

Visual Basic et Excel

1 réponse

Discussions similaires