엑셀. 또는 txt파일내 값 참조하기

안녕하세요
이제 막 캐드를 배우기 시작하였는데 해결되지 않는 부분이 있어 질문드립니다

Sub Example_AddLine()
   
    Dim lineObj As AcadLine
    Dim startPoint(0 To 2) As Double
    Dim endPoint(0 To 2) As Double
   
    startPoint(0) = 1
    startPoint(1) = 1
    startPoint(2) = 0
    endPoint(0) = 5
    endPoint(1) = 5
    endPoint(2) = 0
   
    Set lineObj = ThisDrawing.ModelSpace.AddLine(startPoint, endPoint)
   
End Sub

다음과 같은 간단한 VBA를 통해서 1,1,0 에서 5,5,0으로 직선을 그리는 매크로를 만들었는데요
여기서 c폴더 내에 sample이라는 xlsx.의 sheet1의 a1값을 참조하여 작업을 하도록 하고싶습니다
a1값이 5일때

    endPoint(0) = “=’C:새 폴더[sample.xlsx]Sheet1′!$A$1″
    endPoint(1) = “=’C:새 폴더[sample.xlsx]Sheet1′!$A$1″

처럼 하면 위나/ 아래나 똑같은 결과가 나올줄 알았는데
’13’ 런타임오류가 났습니다/ 형식이 일치하지 않습니다
이렇게 뜹니다…
아마 a1값의 형식이 double이 아니라 그런것 같은데
어떻게 해결해야 하는지 실마리좀 부탁드릴께요..