Ouvrir un fichier Excel a partir d'une commande VB
Résolu/Fermé
TraderAS
Messages postés
110
Date d'inscription
lundi 3 décembre 2012
Statut
Membre
Dernière intervention
26 avril 2018
-
29 janv. 2013 à 17:54
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 31 janv. 2013 à 13:14
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 31 janv. 2013 à 13:14
A voir également:
- Ouvrir un fichier Excel a partir d'une commande VB
- Comment ouvrir un fichier epub ? - Guide
- Ouvrir fichier .bin - Guide
- Comment ouvrir un fichier docx ? - Guide
- Fichier rar - Guide
- Ouvrir un fichier .dat - Guide
2 réponses
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 751
30 janv. 2013 à 10:25
30 janv. 2013 à 10:25
Bonjour,
VB ou VBA ??
VB ou VBA ??
TraderAS
Messages postés
110
Date d'inscription
lundi 3 décembre 2012
Statut
Membre
Dernière intervention
26 avril 2018
1
31 janv. 2013 à 13:08
31 janv. 2013 à 13:08
Bonjour
c du VB
c du VB
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 751
31 janv. 2013 à 13:14
31 janv. 2013 à 13:14
Bonjour,
Allez hop, un p'tit tuto
et la réponse ICI :
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