Menu
Donnez votre avis

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

Posez votre question
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.
Ajouter un commentaire

Commentaires

Commenter la réponse de sam
Comment créer une carte de menu de Noël
Administration de Salome TMF