|
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 >
|
