VBA에서 수식을 삽입하십시오.

다음 코드를 사용하여 수식을 변경된 셀에 삽입하려고합니다. 어떤 오류도 발생하지 않지만 코드는 워크 시트에 채워지지 않습니다. 내가하지 않는 것에 대한 통찰력?VBA에서 수식을 삽입하십시오.

formula_p1 = _ 
"=GETPIVOTDATA(""Max of " & [value_column_header] & ",Database!R1C14, & _ 
    ""Key"",& Key &)" 
     Debug.Print Cell.Address 
      Sheets("Cost Sheet").Cell.Formula = formula_p1

감사합니다. 내가 마지막 부분의 연결에 붙어 아래

업데이트

내 현재 코드입니다. VBA에서이 작업을 수행하는 방법을 잘 모르겠습니다. 또한 워크 시트에서 수행 할 수있는 "가족"부분의 변경 사항을 다시 평가하는 수식이 필요합니다. "패밀리"의 변경은 콤보 상자 선택을 통해 수행됩니다.

formula_1 = _ 
      "=GETPIVOTDATA(""Max of " & value_column_header & """,Database!$N$1,""Key""," & Concatenate(CurrentHFMFamily, G5, Left(B12, 4)) & ")"

출처

2014-03-13 RL001

'시트 ("비용 시트"). 셀 - 어떤 셀입니까? 셀 (1,1) 또는 시트 ("비용 시트") 범위 ("A1") 또는 다른 것 –

변경된 셀 주소가 저장되고 .cell은 셀 변경 주소를 참조합니다. – RL001

'Ctrl-Alt-F9'를 누르면 업데이트됩니까? 그런 다음 http://msdn.microsoft.com/en-us/library/office/bb687891(v=office.15).aspx – Smandoli

이것은 내가 수행하려고 시도한 결과의 최종 결과입니다. 그것은 꽤 아니지만 그것은 빠르고 안정적입니다.

=IF(INDIRECT(CONCATENATE("B",ROW()))=""," ",IFERROR(GETPIVOTDATA("Max of & _ 
    "&INDIRECT((ADDRESS(11,COLUMN())))&"_ADJ",Database!R1C14,"Key",& _ 
    LEFT(INDIRECT(CONCATENATE("B",SUM(ROW()-1))),4)&CurrentHFMFamily& & _ 
    (OFFSET(INDIRECT(ADDRESS(ROW(),COLUMN())),-(SUM(ROW()-(5))),- & _ 
    (MOD(COLUMN()+1,4))))),0))

아이디어를 얻은 모든 사람들 덕분에 그들은 올바른 방향으로 나를 가리켜주었습니다.

출처

2014-04-01 16:12:07 RL001

VBA에서 수식을 삽입하십시오.

답변

관련 문제