3 Commencez par Tapez le code VBA suivant pour créer un nouveau sous procédure :
createSpreadSheet Private Sub () de
4
Continuer en tapant le code suivant pour créer trois nouveaux objets variables qui seront utilisées pour créer la feuille de calcul Excel :
Dim newExcelApp Comme Excel.application
newWbk As Excel.Workbook
newWkSheet As Excel.Worksheet
5
Ajoutez le code suivant pour lancer Excel et afficher:
Set newExcelApp = Excel.Application
newExcelApp.Visible = True
6
Tapez la commande suivante pour ajouter un nouveau classeur et une feuille de calcul :
Set newWbk = newExcelApp.Workbooks.Add
Set newWkSheet = newWbk.Worksheets (1)
7
ajouter des données sur votre nouvelle feuille de calcul en tapant la commande suivante : .
newWkSheet.Cells (1, 1 ) value = " nouvelle feuille de calcul ... "
8
enregistrer le nouveau classeur créé en tapant le code suivant :
newWkSheet.SaveAs (" C: \\ myworksheet.xlsx " )
9
Modifier le chemin à l'étape précédente et entrez le chemin et le nom de fichier de votre choix
10
tapez le texte suivant à la fin de la procédure sous : .
End Sub
11
Appuyez sur " F5 " pour exécuter votre procédure et de créer une nouvelle feuille de calcul Excel.