Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> software >> Microsoft Access >> .

Come passare i dati in Excel da Visual Basic

Microsoft Office Excel e Visual Basic sono molto popolari . I programmatori spesso usano Excel per esportare i dati dalle loro applicazioni VB , che offre all'utente più opzioni per l'analisi dei dati . In VB è possibile utilizzare la libreria di oggetti di Microsoft Excel per creare o aprire le cartelle di lavoro di Excel e salvare i dati a loro dal vostro programma di VB . Innanzitutto è necessario aggiungere un riferimento alla libreria , quindi è possibile utilizzare gli oggetti dell'applicazione per controllare Excel . Istruzioni
1

Avviare Microsoft Visual Basic Express , fare clic su Nuovo progetto nel riquadro di sinistra dello schermo e selezionare Applicazione Windows . Fare clic su "OK".
2

doppio clic su TextBox nel riquadro Casella degli strumenti per aggiungere un nuovo controllo casella di testo alla maschera . Aggiungere una seconda casella di testo e un pulsante con la stessa tecnica .

3 Fare clic sul menu Progetto e selezionare "Proprietà " . Fare clic su Riferimenti e selezionare Aggiungi . Selezionare COM e fare clic su " Libreria oggetti di Microsoft Excel . " Fare clic su " OK ".
4

doppio clic su Button1 per aprire l'evento click del pulsante . Digitare il seguente codice nella prima riga del modulo per dichiarare lo spazio dei nomi di Microsoft Office :

Importazioni Microsoft.Office.Interop
5

Copia e incolla il seguente codice per creare un nuova cartella di lavoro di Excel e aggiungere i valori delle caselle di testo al foglio di lavoro :

Dim xlApp come nuovo Excel.Application

xlApp.Visible = True

Dim XLwks As Excel.Workbooks = XLapp.Workbooks

Dim XLwk Come Excel.Workbook = XLwks.Add

Dim XLshts Come Excel.Sheets = XLwk.Worksheets

Dim XLsht Come Excel.Worksheet XLshts = ( " Foglio1 " ) per

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

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

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

6 Premere il tasto " F5 " per eseguire il programma e inserire il testo nella prima casella di testo . Immettere il testo nella seconda casella di testo . Premere il tasto " Button1 " per passare le informazioni nelle caselle di testo alla cartella di lavoro di Excel salvati in C : \\. ExcelBk.xlsx

 

software © www.354353.com