Ouvrir un fichier Excel a partir d'une commande VB

Résolu
TraderAS Messages postés 119 Statut Membre -  
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,

je souhaite ouvrir un fichier Excel à partir d'une commande VB

Merci

2 réponses

  1.
    pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Bonjour,

    VB ou VBA ??
    0
  2. TraderAS Messages postés 119 Statut Membre 1
     
    Bonjour

    c du VB
    0
    1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      Bonjour,

      Allez hop, un p'tit tuto
      et la réponse ICI : 
      'Déclaration des variables
Dim xlsapp as Excel.Application
Dim Xlsbook as Excel.Workbook
Dim Xlsheet as Excel.Woksheet
 
'lancement d'excel et ouverture du fichier
Set xlsapp = New Excel.application
set xlsbook = xlsapp.workbooks.Open("Chemin+Nom du fichier.xls")
set Xlsheet = xlsbook.Worksheets(N°Feuille a activer)
 
Xlapp.Visible = true
 
'déchargement d'excel
Set xlsheet = nothing
set Xlsbook = nothing
Excel.Application.Quit
Set Xlsapp = nothing
      0