이 기사에서는 워드 문서를 여는 매크로를 만들 것입니다.

워드 문서를 열기 위해 메인 시트의 텍스트 상자에 문서의 전체 경로를 지정합니다. 전체 경로를 지정한 후 “제출”버튼을 클릭하여 매크로를 실행합니다.

ArrowMainSheet

코드 설명

Dim WDApp As Word.Application 위 코드는 단어 응용 프로그램의 개체를 선언하는 데 사용됩니다.

WDApp = CreateObject ( “word.Application”) 설정

위의 코드는 응용 프로그램이라는 단어의 새 개체를 만드는 데 사용됩니다. Word 응용 프로그램이 실행되기 시작하지만 기본적으로 표시되지 않습니다.

WDApp.Visible = True 위 코드는 단어 응용 프로그램 창을 표시하는 데 사용됩니다.

WDDoc = WDApp.Documents.Open (FileName)

설정 위의 코드는 워드 문서를 여는 데 사용됩니다.

Set WDDoc = Nothing Set WDApp = Nothing Above 코드는 개체가 차지하는 메모리를 해제하는 데 사용됩니다.

아래 코드를 따르세요

Sub OpeningWordFile()

'Declaring variables

Dim FileName As String

Dim WDApp As Word.Application

Dim WDDoc As Word.Document

'Getting the file name from the text box

FileName = Sheets("Main").TextBox1.Value

'Creating object of the word application

Set WDApp = CreateObject("word.Application")

'Making visible the word application

WDApp.Visible = True

'Opening the required word document

Set WDDoc = WDApp.Documents.Open(FileName)

'Release the memory used by object variable

Set WDDoc = Nothing

Set WDApp = Nothing

End Sub

이 블로그가 마음에 들면 Facebook 및 Facebook에서 친구들과 공유하십시오.

여러분의 의견을 듣고 싶습니다. 작업을 개선하고 더 나은 서비스를 제공 할 수있는 방법을 알려주십시오. [email protected]로 문의 해주세요