Afficher un message
Vieux 27/04/2006, 15h36   #3 (permalink)
NikoZozo
Guest
 
Messages: n/a
Par défaut Re:Appel d'une macro Excel via script VBS

Bonjour Hervé,

Merci pour le pseudo et pour le code


Finalement, je viens de trouver. (pas sans mal, mais c'est bon)
Je fais appel à ma macro en automatique à partir de mon script VBS directement. Celui-ci etant placé en tâche planifié.

Voici donc mon code VBS opérationnel, cela pourrais surement servir pour d'autres personnes


Contenu du vbs :

Dim objExcel
Dim objWorkbook
Set objExcel = CreateObject('excel.application')
Set objWorkbook = objExcel.Workbooks.Open('c:\\Scripts\\MonFichier.x ls')
objWorkbook.RunAutoMacros 1 'xlautoopen
objExcel.Run ('Macro1')
objExcel.Visible = True

Contenu de la macro :

Sub Macro1()
ActiveCell.FormulaR1C1 = '1'
Range('A2').Select
ActiveCell.FormulaR1C1 = '2'
Range('A1:A2').Select
Selection.AutoFill Destination:=Range('A1:A20'), Type:=xlFillDefault
Range('A1:A20').Select
Range('A1').Select
End Sub

Voila , en tout cas merci pour tout.
Bonne continuation.

NikoZozo
  Réponse avec citation