Visual Basic 6 est le langage de programmation et un environnement de développement intégré déployé par Microsoft . Le langage est populaire pour son développement rapide d'applications , et d'automatisation . Les programmeurs VB6 sont capables de programmer et d'automatiser un certain nombre de programmes de Microsoft , y compris Microsoft Office , et en particulier Microsoft Excel. Les programmeurs sont capables d' objets de référence relatifs à exceller dans leur code VB6, ce qui leur permet d'automatiser , lire et écrire le programme . L'écriture de code VB6 prend une certaine connaissance de la syntaxe de programmation , une fois la connaissance est acquise , écrit à Excel dans votre code VB6 ne prend que quelques étapes et de lignes de code à suivre. Instructions
1

Ouvrez Visual Basic 6 et sélectionnez " EXE standard " de la nouvelle liste de projets .
2

Aller à la barre de menu du haut , cliquez sur "Projet" , puis cliquez sur "Ajouter Module ». Cela va ajouter un module de code standard dans votre projet VB6 .
3 Type de

ou copier et coller le code suivant dans le module, selon Mike Rosenblum de Xtreme VB Talk.
< p> Sous WriteToExcel ()

oExcel As Excel.Application '< - *** référence à Excel objet Demande ***

OWB As Excel.Workbook ' < - - *** référence à Excel objet Workbook ***

OWS As Excel.Worksheet '< - *** référence à Excel objet Feuille ***

Set oExcel = Nouveau Excel.application

oExcel.Visible = True

oRng1 As Excel.Range

oRng2 As Excel.Range

Set OWB = oExcel.Workbooks . Ajouter

Set OWS = oWB.Worksheets ( "Sheet1" )

Set oRng1 = oWS.Range ( "A1")

Set oRng2 = oWS.Range ( " B2 : E5 " )

oRng1.Value =" Bonjour le monde "

oRng1.Copy d'appel ( Destination: = oRng2 )

oWB.SaveAs (" Bonjour World.xls " ) '< - Résultats enregistrés ici

Nettoyage: Photos

Set OWS = Nothing

If Not OWB n'est rien Puis oWB.Close

. set OWB = Nothing

oExcel.Quit

set oExcel = Nothing End Sub

Le code référence à des objets Microsoft Excel , puis utilise cette connexion pour ouvrir Microsoft Excel, puis écrire le mot « Bonjour tout le monde " dans la cellule B2 A1 et la plage : E5 . Ensuite, il enregistre le document comme « Bonjour World.xls » sur votre ordinateur et procède à dénouer Microsoft Excel.
4

Appuyez sur " F5" pour exécuter le programme .
< Br >