/ / Извикване на Word макро от Excel с аргументи? - vba, excel-vba, word-vba, excel

Извикване на Word макро от Excel с аргументи? - vba, excel-vba, word-vba, excel

Имам трудности при намирането на отговор заследния проблем. Това, което се опитвам да направя, е да назове макрос от Word от Excel с аргумент, име на файла да е специфично. Excel създава .txt файл, след което се нуждая от дума, за да го обработя. Проблемът е как мога да получа информация, за да се възползвам от името на файла?

Имам някакъв код, за да започнете с и когато използвате hardcoded име на файл в макро дума ми да го да работи, но имам нужда от името на файла, за да бъдат предадени като променлива.

Кодът досега:

    Public Function convertTxt(txtFile As String)

Dim WD As Object
Set WD = CreateObject("Word.Application")

WD.Documents.Open ThisWorkbook.Path & "Word" & "far.docm"

" Note that the project name and module name are required to
" path the macro correctly.
WD.Run "runTxtConversion(txtFile)"

End Function

Някакви предположения?

Това е първият път, когато публикувам въпрос, така че всеки съвет за това как питам въпроси също е ценен.

Отговори:

2 за отговор № 1

Опитайте да използвате:

WD.Run "runTxtConversion", txtFile

Методът "Изпълнение" има 31 аргумента - първото е името на макроса, а останалите - параметрите, които трябва да преминете (всички тези 30 са по избор).

Кодът ви предава буквалния текст "runTxtConversion (txtFile)" като името на макроса.