call makro

jak wywolac z delphi makro w excelu?

ExcelApplication1.ExecuteExcel4Macro
ExcelApplication1.Run

a ajk to skomponeowac by makro mialo jedne parametr a delphi wysyla go do skrptu...

[delphi]
excel.makro(parametr)

[excel]
makro biegaj(s:string)
...

potrzebuej zrobic to makro
Sub open2()
With ActiveSheet.QueryTables.Add(Connection:="TEXT;C:\a.txt", Destination:= _
Range("A1"))
.Name = "a"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.TextFilePromptOnRefresh = False
.TextFilePlatform = xlWindows
.TextFileStartRow = 1
.TextFileParseType = xlDelimited
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = False
.TextFileSemicolonDelimiter = False
.TextFileCommaDelimiter = True
.TextFileSpaceDelimiter = False
.TextFileColumnDataTypes = Array(1, 1, 1, 1, 1, 1, 1)
.Refresh BackgroundQuery:=False
End With
End Sub

ak bym mogl podawac z delphi scaezke i je wywolywac

pliz jak to zrobic?

moze ExcelApplication.Run('biegaj','parametr');