|
Microsoft Excel est un tableur qui vous permet de créer des tableurs pour organiser et calculer des données et des graphiques. Visual Basic 6 ( VB6 ) est une version de Visual Basic, qui est le langage de programmation et un environnement de développement intégré créé par Microsoft . Création des informations dans Excel est plus facile que dans VB6 , il est parfois pratique d'importer des données à partir d'Excel à VB6 . Il ya plusieurs façons de le faire , mais la plus simple est une ligne de code en Visual Basic qui automatise le processus . Instructions
1 Démarrez un nouveau projet Visual Basic.
2 Ajouter une liste déroulante et le bouton de commande au formulaire .
3 Sélectionnez " Menu Projet ", puis sélectionnez l'option «Références» . A partir de là , choisissez la ligne « Microsoft Excel Library " .
4 Entrez dans le code suivant .
Private Sub Command1_Click ()
Dim objXLApp Comme Excel. demande
intLoopCounter As Integer
Set objXLApp = New Excel.Application
objXLApp
Workbooks.Open . "C: \\ File.xls " Photos . classeurs (1). Feuilles (1). Sélectionnez
intLoopCounter = 1 To CInt ( . ActiveSheet.Cells.SpecialCells ( xlCellTypeLastCell ) . Row )
List1 . AddItem . Range (" A" & intLoopCounter )
Suivant intLoopCounter
. classeurs (1). Fermer Faux
. Quit
End With
Set objXLApp = Nothing End Sub
5 changer le " C: \\ File.xls " pour le nom de votre fichier Excel. Ce sera maintenant importer les données de votre feuille de calcul Excel.
|
