Πώς να περάσει δεδομένων στο Excel από τη Visual Basic

Microsoft Office Excel και Visual Basic είναι πολύ δημοφιλείς . Οι προγραμματιστές, συχνά χρησιμοποιούν το Excel για την εξαγωγή δεδομένων από τις εφαρμογές VB τους, η οποία δίνει στον χρήστη περισσότερες επιλογές για την ανάλυση των δεδομένων . Στη VB , μπορείτε να χρησιμοποιήσετε τη βιβλιοθήκη αντικειμένων του Microsoft Excel για να δημιουργήσετε ή να ανοίξετε βιβλία εργασίας του Excel και να αποθηκεύσετε τα δεδομένα σε αυτούς από το πρόγραμμα VB σας . Θα πρέπει πρώτα να προσθέσετε μια αναφορά στη βιβλιοθήκη ? Τότε μπορείτε να χρησιμοποιήσετε τα αντικείμενα εφαρμογή για τον έλεγχο του Excel . Οδηγίες
Η 1

Ξεκινήστε το Microsoft Visual Basic Express , κάντε κλικ στην επιλογή Νέο έργο στο αριστερό τμήμα της οθόνης σας και επιλέξτε Windows Forms Application . Κάντε κλικ στο " OK". 2

Κάντε διπλό κλικ στο πλαίσιο κειμένου στο παράθυρο Toolbox για να προσθέσετε ένα νέο στοιχείο ελέγχου πλαισίου κειμένου στη φόρμα . Προσθέστε ένα δεύτερο πλαίσιο κειμένου και ένα κουμπί με την ίδια τεχνική .
Εικόνων 3

Κάντε κλικ στο μενού Έργο και επιλέξτε " Properties" . Κάντε κλικ στην επιλογή Αναφορές και επιλέξτε Προσθήκη . Επιλέξτε COM και κάντε κλικ στο "Microsoft Excel βιβλιοθήκη αντικειμένων . " Κάντε κλικ στο " OK".
Η

4 Κάντε διπλό κλικ Button1 για να ανοίξετε το κλικ εκδήλωση για το κουμπί . Πληκτρολογήστε τον ακόλουθο κώδικα στην πρώτη γραμμή της μονάδας για να δηλώσει το χώρο ονομάτων του Microsoft Office :

Εισαγωγές Microsoft.Office.Interop
5

Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να δημιουργήσετε ένα νέο βιβλίο εργασίας του Excel και να προσθέσετε τις τιμές πλαίσιο κειμένου στο φύλλο εργασίας :

Dim xlApp Όπως New Excel.Application

XLapp.Visible = True

Dim XLwks Όπως Excel.Workbooks = XLapp.Workbooks

Dim XLwk Όπως Excel.Workbook = XLwks.Add

Dim XLshts Όπως Excel.Sheets = XLwk.Worksheets

Dim XLsht Όπως Excel.Worksheet = XLshts ( " Φύλλο1 " )

XLsht.Range ( "A1" ) . Value = Me.TextBox1.Text.ToString

XLsht.Range ( " A2 " ) . Value = Me.TextBox2.Text . ToString

XLsht.SaveAs ( " C : \\ excelBk.xlsx " )
Η

6 Πατήστε το πλήκτρο " F5 " για να τρέξετε το πρόγραμμά σας και να εισάγετε κείμενο στο πρώτο πλαίσιο κειμένου . Εισάγετε το κείμενο στο δεύτερο πλαίσιο κειμένου . Πατήστε " Button1 " για να περάσει τις πληροφορίες στα πλαίσια κειμένου στο βιβλίο εργασίας του Excel αποθηκεύονται στο C : \\. ExcelBk.xlsx
Η
εικόνων