VBS active une macro Excel
Fermé
jeje173
Messages postés
3
Date d'inscription
jeudi 1 octobre 2015
Statut
Membre
Dernière intervention
16 octobre 2015
-
1 oct. 2015 à 09:31
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 - 1 oct. 2015 à 13:42
cs_Le Pivert Messages postés 7904 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 14 août 2024 - 1 oct. 2015 à 13:42
A voir également:
- VBS active une macro Excel
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Déplacer une colonne excel - Guide
- Calculer une moyenne sur excel - Guide
- Si et excel - Guide
2 réponses
cs_Le Pivert
Messages postés
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
1 oct. 2015 à 11:54
1 oct. 2015 à 11:54
Bonjour,
Il faut tout d'abord que ta macro soit dans un module, que ton classeur soit fermé:
Il faut tout d'abord que ta macro soit dans un module, que ton classeur soit fermé:
Dim Xl Dim Wb Set Xl = CreateObject("Excel.application") Xl.Visible = True Set Wb = Xl.Workbooks.Open("C:\Users\.....\Documents\essai.xls") ' a adapter le chemin Xl.Run "test" ' a adapter Set x1 = nothing
cs_Le Pivert
Messages postés
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
1 oct. 2015 à 13:42
1 oct. 2015 à 13:42
essaie ceci, mais ton classeur ne sera pas enregistré:
Dim Xl Dim Wb Dim path Set Xl = CreateObject("Excel.application") Xl.Visible = True Path = Left(WScript.ScriptFullName, InStr(WScript.ScriptFullName, WScript.ScriptName)-1)'chemin du vbs Xl.Application.Quit Set Wb = Xl.Workbooks.Open(Path & "essai.xls") Xl.Run "test" Set Xl = nothing
1 oct. 2015 à 12:12
Merci pour ces informations.
Ma macro est déjà dans un module donc pas de soucis de côté-là.
Par contre, pour que mon classeur soit fermé je devrais l'enregistré et là je me plante aussi.
Est-ce qu'il serait possible d'utiliser une ligne ainsi ?:
Set Wb = X1.Workbooks.save(C:\............")
Merci d'avance