Hvordan overføre data til Excel fra Visual Basic

Microsoft Office Excel og Visual Basic er svært populære. Programmerere bruker ofte Excel til å eksportere data fra sine VB-applikasjoner, noe som gir brukeren flere alternativer for dataanalyse. I VB kan du bruke Microsoft Excel objektbiblioteket for å opprette eller åpne Excel-arbeidsbøker og lagre data til dem fra VB program. Du må først legge til en referanse til biblioteket; så kan du bruke programmet objekter for å styre Excel.

Bruksanvisning

1 Start Microsoft Visual Basic Express, klikker du Nytt prosjekt på ruten til venstre på skjermen, og velg Windows Forms Application. Klikk på "OK".

2 Dobbeltklikk TextBox på Toolbox ruten for å legge til en ny tekstboks kontrollen til skjemaet. Legg en annen tekstboks og en knapp med den samme teknikken.

3 Klikk på Prosjekt-menyen og velg "<prosjektnavn> Egenskaper". Klikk Referanser og velg Legg til. Velg COM og klikk "Microsoft Excel <versjonsnummer> Object Library." Klikk på "OK".

4 Dobbeltklikk Button1 å åpne klikkhendelsen for knappen. Skriv inn følgende kode i den aller første linje av modulen til å erklære Microsoft Office navnerom:

importen Microsoft.Office.Interop

5 Kopier og lim inn følgende kode for å opprette en ny Excel-arbeidsbok og legge tekstboksen verdier til regnearket:

Dim XLapp som ny Excel.Application

XLapp.Visible = True

Dim XLwks Som Excel.Workbooks = XLapp.Workbooks

Dim XLwk Som Excel.Workbook = XLwks.Add

Dim XLshts Som Excel.Sheets = XLwk.Worksheets

Dim XLsht Som Excel.Worksheet = XLshts ( "Ark1")

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

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

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

6 Trykk "F5" for å kjøre programmet og skrive inn tekst i den første tekstboksen. Skriv inn tekst i den andre tekstboksen. Trykk "Button1" for å sende informasjonen i tekstboksene til lagret i C Excel arbeidsbok: \ excelBk.xlsx.