Wie rufe ich ein Excel-Makro auf? VB-Version:  VB5, VB6
	Views:  528

Von VB aus ein Excel-Makro aufzurufen geht so:

Als Erstes fügen Sie in Ihr Projekt einen Verweis auf die Microsoft Excel n.0 Object Library ein. Das n steht für die Version: 8.0 für Excel 97/98, 9.0 für Excel 2k oder 10.0 für Excel 2002 XP.

Dann wird noch folgender Code benötigt:

Private oExl As New Excel.Application
 
Private Sub LoadMacro(Byval sFileName, Byval sMakroName As String)
  Dim Result As Variant 
 
  oExl.Workbooks.Open(sFileName)
  Result = oExl.Run(sMakroName, Parameterliste)
End sub