Я пытаюсь указать путь к файлу моей книги, который я хочу открыть из той же директории, где находится моя текущая книга. Я видел какое-то решение здесь:
Открыть файл без вызова Filepath
, и мой код в настоящее время выглядит так:
Sub RamsOpen3()
Dim appWD As Word.Application
Set appWD = New Word.Application
Dim docWD As Word.Document
Set docWD = appWD.Documents.Open ActiveWorkbook.Path & "RAMS.docx.docm")
appWD.Visible = True
'
' Data is selected and copied into "Design"
'
'Copy all data from Design
Sheets("Frontsheet").Select
Range("D18").Copy
' Tell Word to create a new document
appWD.Selection.Paste
' Save the new document with a sequential file name
Sheets("Sheet1").Select
appWD.ActiveDocument.SaveAs filename:=ThisWorkbook.path & "/" & "TEST" & Range("C8").Text
' Close this new word document
appWD.ActiveDocument.Close
' Close the Word application
appWD.Quit
End Sub
Строка кода выделено красным, и отладчик говорит: Ожидаемый конец оператора .
Он также исключает параметр с именем Dim filename как Строка, предложенная в связанном запросе выше.
Кто-нибудь знает, как с ней связываться?