2013-07-05 2 views
0

값 대신 셀 참조를위한 VBA 구문을 원합니다.셀 값 대신 셀 참조를위한 VBA 구문

나는

Workbook().Worksheet().Cell().Value 셀의 값을 반환 것을 알고있다.

workbook().worksheet().cell().address 

을하지만, 그것은 단지 $B$8 부분을 반환

나는 내가 사용하려고이 ='[Vba Source Test.xlsx]Source'!$B$8

같은 셀 참조, 뭔가를 알고 싶어요.

이렇게 코드에서 사용하게 될 것입니다.

Workbook(Master).Worksheet(Summary).range(a1).value = 
workbook(Source).Worksheet(Data).cell(2,8).address 

누구든지 도와 주셔서 다시 한 번 감사드립니다. 내 생각은 셀의 FormulaString 값을 할당한다 무엇을하고 있는지

"='["Workbook(Source).Name & "]" & Worksheet(Data).Name & "'" & Cells(2,8).Address

것은이 일을해야하기 때문에 :

답변

1

당신은 개체 이름 & 적절한 분리와 범위의 주소를 연결하는 필요 (하지만 테스트하지 않았습니다, 그래서 거기에 오타 될 수 있습니다) :

Dim myFormula as String 
myFormula = "='["Workbook(Source).Name & "]" & Worksheet(Data).Name & "'!" & Cells(2,8).Address 

Workbook(Master).Worksheet(Summary).range(a1).Formula = myFormula 

당신은에서 통합 문서 Name를 생략 할 수 있습니다 이, 나는 열려있는 통합 문서에 속하는 워크 시트를 지정하는 한 워크 북 이름이 자동이라는 것을 확신합니다. 수식을 삽입 할 때 파일이 열려 있지 않으면 통합 문서 이름을 포함시켜야합니다.

+1

감사합니다. 무리를 지어서, 공식을 가지고 바이올린을 할 것입니다. 내 워크 북을 특정 이름으로 설정 한 이후로 혼란 스럽다. 당신은 엑셀이이 상황을 위해 지어 졌다고 생각할 것입니다. – Reccax

+1

제대로 작동합니다. 누락 된 부분은 "!" WSMaster.Cells (master2, master1). 값 = "= '["& Sourcetext & "]"& sourcetext1 & "'"& "!" & 주소 1 – Reccax