ADODB.Connection - Как получить "referto" именованного диапазона в закрытой книге xlsm

Question

Я хотел бы прочитать свойство referto именованного диапазона в закрытой рабочей книге xlsm...

Я решил использовать ADODB.Connection для этого... (Это хороший способ???)

Обратите внимание, что я не хочу, чтобы открыть файл WhatEver. xlsm, который содержит имя (в менеджере диапазона) с именем "_qa_NR" с областью действия "рабочая книга" и ссылкой на значение " =" A; B; C " "

Я хотел бы извлечь это значение " =" A; B; C " " (или намного лучше A; B; C!)

Заранее большое спасибо за вашу помощь и советы!

    Dim Cn As Object 'ADODB.Connection
    Dim Fichier As String
    Dim myNamedRange As String
    Dim p

    Fichier = "C:\Users\...\WhatEver.xlsm"
    Set Cn = CreateObject("ADODB.Connection")

    With Cn
        .Provider = "Microsoft.Jet.OLEDB.4.0"
        .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" _
           & Fichier & ";Extended Properties=""Excel 12.0;HDR=YES;"""
        .CursorLocation = adUseClient
        .Open
    End With

    Set Rs = CreateObject("ADODB.Recordset")
    Rs.CursorLocation = adUseClient

    myNamedRange = "_qa_NR"

    '  SELECT * FROM "_qa_NR"
    '  ==> Error "-2147217900 (80040e14)" Syntax error

    '  SELECT * FROM _qa_NR
    '  ==> Error "-2147217865 (80040e37)" Can't find object _qa_NR

    'rqt = "SELECT * FROM " & myNamedRange

    Set Rs = Cn.Execute(rqt)   ' <== fails here :(