Dim coucou As Application 'declare la variable coucou en tant qu'object application
Set coucou = CreateObject("Excel.Application") 'on crée l'object application
coucou.Visible = True 'on la rend visible
coucou.Workbooks.Add 'on ajoute un nouveau classeur