Lancering Microsoft Visual Basic Express , klikt u op " New Project" van het linkerpaneel van uw computerscherm en klik op ' Windows Forms Application . " Klik op "OK . "

Dubbelklik op " Button " 2 naar een nieuwe knop toe te voegen . Dubbelklik op " Button1 " naar een gebeurtenis click voor deze toets te maken . Klik op het menu " Project " , klik op "Add Reference ", vervolgens op het tabblad "COM" . Dubbelklik op " Microsoft Excel Object Library " om het als een verwijzing toe te voegen .

Kopieer 3 en plak de volgende code om de Excel- object-variabelen maken je zal gebruiken om maak een nieuwe Excel-werkmap :

Dim objXLS
Als Application = nieuw Application

Dim objXLXBks
Zoals werkmappen = Nothing

Dim objXLSBk
als Werkboek = Nothing

Dim objXLSShts Zoals Sheets = Nothing

Dim objXLSSht
als Aantekenvel = Nothing

Dim objXLSrng
als Range = Nothing

Type 4 de volgende code om een nieuwe werkmap toe te voegen : < br >

objXLS.Visible = False

objXLS.DisplayAlerts
= False

objXLSBk = C ( objXLS.Workbooks.Add ( ) , Werkboek )
5

Voeg de volgende code om een nieuw werkblad toe te voegen :

objXLXBks
= objXLS.Workbooks

objXLSSht = C ( . objXLXBks ( 1 ) Sheets.Item ( 1 ) , werkblad ) op Twitter

objXLSShts = objXLSBk.Worksheets
6

Insert de datum " A1 " in Excel door het toevoegen van de volgende regel code :

objXLSSht.Cells
( 1 , 1 ) = Now ( )
7

Sla het Excel-werkmap door de volgende code :

objXLSSht.SaveAs
( " C : \\ ExcelDate.xlsx " )
8

Laat een bericht wanneer de werkmap is gemaakt en opgeslagen .

MessageBox.Show
( " Datum is toegevoegd aan Excel " )

Druk op F5
om uw programma uit te voeren , en klik op ' Button1 . "