이 기사에서는 닫는 통합 문서를 열고 열려있는 통합 문서를 닫는 데 사용되는 Excel VBA에서 메서드를 닫고 여는 방법에 대해 알아 봅니다.

엑셀 시트에 커맨드 버튼을 생성하고 매크로를 할당합니다.

Activex 컨트롤을 만드는 방법에 대해 알아 보려면`link : / tips-activex-controls-in-microsoft-excel-2010 [link]`을 클릭하세요.

VBA를 통해 Excel 통합 문서를 여는 방법은 무엇입니까?

아래 주어진 단계와 코딩을 따르십시오 :-* 2 개의 명령 단추를 삽입하십시오.

  • 첫 번째 명령 단추는 명령 단추에서 마우스 오른쪽 단추를 클릭하는 데 사용됩니다.

  • VBE 페이지가 열리고 아래 코딩을 복사하여 VBE 페이지에 붙여 넣습니다.

  • 통합 문서를 열려면 아래 언급 된 매크로를 할당하십시오.

하위 sOpenWorkbook ()

‘define variable for file name Dim csFileName As String’get filename from cell A1 on Sheet1 csFileName = ThisWorkbook.Sheets ( “Example Open and Close”). Range ( “A1”)

‘통합 문서를 엽니 다. Workbooks.Open csFileName MsgBox csFileName & “open”

End Sub * 두 번째 명령 버튼을 사용하여 명령 버튼에서 마우스 오른쪽 버튼을 클릭합니다.

  • VBE 페이지가 열리고 아래 코딩을 복사하여 VBE 페이지에 붙여 넣습니다.

  • 통합 문서를 열려면 아래 언급 된 매크로를 할당하십시오.

하위 sCloseWorkbook ()

‘define variable for file name Dim csFileName As String’get filename from cell A1 on Sheet1 csFileName = ThisWorkbook.Sheets ( “Example Open and Close”). Range ( “A1”)

‘close the workbooks (Split (csFileName, “\”) (UBound (Split (csFileName, “\”)))). CloseMsgBox Split (csFileName, “\”) (UBound (Split (csFileName, “\”))) & “닫힘”

End Sub 두 매크로 모두 명령 버튼에 할당되며 아래 매크로 코딩을 사용해야합니다.

Option Explicit Sub sExample () Const csFileName As String = _ “C : \ Test \ Master.xlsx”Workbooks.Open csFileNameWorkbooks (Split (csFileName, “\”) (UBound (Split (csFileName, “\”)))). 닫기 End Sub Sub sOpenWorkbook ()

‘define variable for file name Dim csFileName As String’get filename from cell A1 on Sheet1 csFileName = ThisWorkbook.Sheets ( “Example Open and Close”). Range ( “A1”) ‘open the workbooks.Open csFileNameMsgBox csFileName & “opened “

End Sub Sub sCloseWorkbook ()

‘파일 이름에 대한 변수 정의 Dim csFileName As String’Sheet1의 A1 셀에서 파일 이름 가져 오기 csFileName = ThisWorkbook.Sheets ( “Example Open and Close”). Range ( “A1”)

‘close the workbooks (Split (csFileName, “\”) (UBound (Split (csFileName, “\”)))). CloseMsgBox Split (csFileName, “\”) (UBound (Split (csFileName, “\”))) & “닫힘”

End Sub 참고 :-파일에 따라 경로를 언급해야합니다.

image 4