Excel VBA)OpenDatabase 방법 [Excel 2003의 VBA 언어 참조]
‘사용 방법
Dim Filename As String
Dim CommandText As Object
Dim CommandType As Object
Dim BackgroundQuery As Object
Dim ImportDataAs As Object
Dim returnValue As Workbook
Dim workbooks1 As Workbooks
returnValue = workbooks1.OpenDatabase(Filename, CommandText, CommandType, BackgroundQuery, ImportDataAs)
'Declaration
Function OpenDatabase( _
<InAttribute()> ByVal Filename As String, _
<InAttribute()> Optional ByVal CommandText As Object, _
<InAttribute()> Optional ByVal CommandType As Object, _
<InAttribute()> Optional ByVal BackgroundQuery As Object, _
<InAttribute()> Optional ByVal ImportDataAs As Object _
) As Workbook
통합 문서 를 데이터베이스로 반환하여 가져오기. expression.OpenDatabase(FileName, CommandText, CommandType, BackgroundQuery, ImportDataAs) 조건. 개체 중 하나를 반환 표현식을 목록에 적용됩니다. FileName : 필수 문자열 . 데이터베이스의 위치와 파일 이름을 포함하는 연결 문자열입니다. CommandText : 선택 변종 . 쿼리의 명령 텍스트입니다. CommandType : 선택 변종 . 쿼리의 명령을 입력합니다. 상수 중 하나를 지정 xlCmdType 열거 : xlCmdCube , xlCmdList , xlCmdSql , xlCmdTable , 그리고xlCmdDefault . BackgroundQuery 선택 변종 . 이 매개 변수는 변형 데이터 형식하지만 당신은 단지 Boolean 값을 전달할 수 있습니다. 당신이 통과하는 경우 True를 , 쿼리가 백그라운드 (비동기)에서 수행됩니다. 기본값은 False를 . ImportDataAs 선택 변종 . 이 매개 변수는의 값 중 하나를 사용 XlImportDataAs를 열거합니다. 이 열거의 두 값은 xlPivotTableReport 및 xlQueryTable . 피벗 테이블 또는 QueryTable로 데이터를 반환하려면 다음 값 중 하나를 전달합니다. 기본값입니다 xlQueryTable . 이 예제에서는 Microsoft Excel은 "Northwind.mdb를"파일을 엽니다. \ 드라이브 :이 예제는 "Northwind.mdb 데이터 파일"이라는 파일이 C에 존재하는 것으로 가정합니다.예
Sub UseOpenDatabase()
' Open the Northwind database in the background and create a PivotTable
Workbooks.OpenDatabase Filename:="c:\Northwind.mdb", _
CommandText:="Orders", _
CommandType:=xlCmdTable, _
BackgroundQuery:=True, _
ImportDataAs:=xlPivotTableReport
End Sub