다른 시트가 작동하지 않음을 나타내는 VBA를 통해 수식을 삽입하십시오. 대안이 필요합니다

Question

두 문서에서 같은 값이 발견되면 두 시트의 열을 sse와 비교하는 스크립트를 만들었습니다.

두 개의 문서 중 하나에 VBA를 통해 수식을 삽입하면됩니다.

공식은 : =IF(ISNA(MATCH(A1;'[Filename]SheetName'!$B:$B;0));"NO MATCH","MATCH")

문제는 SheetName가 Sheet(insert number here)보다는 다른 어떤 경우 스크립트가 실행되지 않는다는 것입니다. 나는 그것이 시트를 인식하지 못하는 이유를 모르지만 이것에 대한 해결 방법이 필요합니다.

VBA 스크립트 :

Formula1 = "=IF(ISNA(MATCH(" & Chr(col1 + 64) & MyCell1 & ",'[" & fi2 & "]" & SheetName & "'!$" & Chr(col3 + 64) & ":$" & Chr(col3 + 64) & ",0)),""NO MATCH"",""MATCH"")" 

Formula2 = "=IF(" & Chr(col1 + 65) & MyCell1 & "=""NO MATCH"",""-"",IF(INDEX('[" & fi2 & "]" & SheetName & "'!$" & Chr(col4 + 64) & ":$" & Chr(col4 + 64) & ",MATCH(" & Chr(col1 + 64) & MyCell1 & ",'[" & fi2 & "]" & SheetName & "'!$" & Chr(col3 + 64) & ":$" & Chr(col3 + 64) & ",0))=" & Chr(col21 + 63) & MyCell1 & ",""MATCH"",""NO MATCH""))" 

With Range(myRange1) 

     .NumberFormat = "General" 
     .Value = Formula1 
     .Value = .Value 
     .HorizontalAlignment = xlCenter 
     .ColumnWidth = 27 

End With 

With Range(myRange2) 

     .NumberFormat = "General" 
     .Value = Formula2 
     .Value = .Value 
     .HorizontalAlignment = xlCenter 
     .ColumnWidth = 27 

End With 

Answer 1

SheetName 만약 내가 전에 통합 문서 및 워크 시트 이름 후 '에 대해 확실하지 오전하는 WorkSheet 다음 수식에 당신은 또한 SheetName.Name 를 작성해야합니다.