Πώς να γράψετε Πολλαπλές σειρές στο Excel Χρησιμοποιώντας Vb.Net

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

την εφαρμογή Microsoft Visual Studio , κάντε κλικ στο " New Project" από το αριστερό τμήμα του παραθύρου της οθόνης του υπολογιστή σας και να επεκτείνουν " Visual Basic " κάτω " Εγκατεστημένα πρότυπα . " Κάντε κλικ στο "Windows" και κάντε διπλό κλικ στο " Windows Forms Application " από το κέντρο του παραθύρου διαλόγου για να δημιουργήσετε ένα νέο έργο . 2

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

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

4 Πληκτρολογήστε τον ακόλουθο κώδικα στην πρώτη γραμμή της ενότητας για την εισαγωγή του namespace του Microsoft Office :

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

5

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

Dim xlsxA Όπως New Excel.Application

xlsxA.Visible = True

Δημ. xlsxWks Όπως Excel.Workbooks = xlsxA.Workbooks

Dim xlsxWk Όπως Excel.Workbook = xlsxWks.Add

Dim xlsxShts Όπως Excel.Sheets = xlsxWk.Worksheets

dim xlsxSht Όπως Excel.Worksheet = xlsxShts ( " Φύλλο1 " )
Η 6

Προσθήκη πολλών γραμμών στο φύλλο με την προσθήκη του παρακάτω κώδικα :

xlsxSht.Range ( "A1" ) . Value = " Σειρά 1 με τα δεδομένα "

xlsxSht.Range ( " A2 " ) . Value = " Σειρά 2 με δεδομένα "

xlsxSht.Range ( " A3" ) . Value = " Σειρά 3 με δεδομένα "
Η

7 Αποθηκεύστε το υπολογιστικό φύλλο :

xlsxSht.SaveAs ( " C : \\ Temp \\ ExcelFile.xlsx " )
8

τύπου " F5 " για να εκτελέσετε το πρόγραμμα και κάντε κλικ στο " Button1 ".
Η
εικόνων