4 Tapez le code suivant dans la première ligne du module d'importer le namespace Microsoft Office :
importations Microsoft.Office.Interop
5
Ajoutez le code suivant dans l'événement Clic bouton pour créer une nouvelle feuille de calcul Excel :
xlsxA As New Excel.Application
xlsxA.Visible = True
xlsxWks As Excel.Workbooks = xlsxA.Workbooks
de xlsxWk As Excel.Workbook = xlsxWks.Add
xlsxShts As Excel.Sheets = xlsxWk.Worksheets
xlsxSht As Excel.Worksheet = xlsxShts ( "Sheet1" )
6
ajouter plusieurs lignes de la feuille de calcul en ajoutant le code suivant :
xlsxSht.Range ( "A1") . value = " Ligne 1 avec des données "
xlsxSht.Range
( "A2" ) . Value = " Row 2 avec des données "
xlsxSht.Range ( "A3" )
. Value = " Row 3 avec des données "
7
Enregistrer la feuille de calcul :
xlsxSht.SaveAs (" C: \\ Temp \\ ExcelFile.xlsx " )
8
presse "F5" pour exécuter le programme et cliquez sur " Button1 ".