VBA:VB6 - Se servir d'excel à partir d'une autre application

Cette petite routine permet d'appeler excel à partir de VB6 ou d'une autre application Office.
A coller dans un module général (Module1 par exemple)
En VBA >> Insertion >> Module, et dans cette fenêtre coller...
En VB6 >> Projet >> Ajouter un module, et dans cette fenêtre coller...

Dim EX As New Application    
Public Book As Workbook    
Public Feuille As Worksheet

'Ne pas oublier d'ajouter la référence..

'Microsoft Excel X,X object librairy

Sub AjouterExcel()    
    Set EX = CreateObject("Excel.application")    
    EX.Visible = True    
    Set Book = EX.Workbooks.Add    
    'Toutes les fonctions Application sont disponibles avec BooK    
    Set Feuille = Book.Sheets(1)    
    'Exemple:    
    Feuille.Name = "Cette Feuille"    
    With Feuille    
        .[A1] = "Ceci est la cellule A1"    
        .[A2] = "Ceci est la cellule A2"    
        .Columns("A:A").ColumnWidth = 23.14    
    End With    
    'Toutes les fonctions excel sont disponibles avec Feuille.    
End Sub

Les débutants ayant quelques difficultés pour appliquer cette astuce, pourront trouverez un classeur exemple sur ce lien.