OR_File_Name = "데이터"
        OR_Path = "Z:\HDD1\Media\내문서\문서\엑셀공부\"
        경로 = OR_Path & OR_File_Name & ".xlsx"
         
         '*****커넥션스트링**********
         OLEDB데이터문자열 = "Provider=Microsoft.ACE.OLEDB.12.0;" & _
                          "Data Source=" & 경로 & ";" & _
                          "Extended Properties=""Excel 12.0 xml;HDR=YES"";"
    
      연결.Open OLEDB데이터문자열 'DB 연결
         '//조회용 sql 구문
         찾을데이터 = "select * " & _
                   "from [data$]" & _
                   "WHERE 담당 = '" & Cells(1, 1) & "'"