Brian은 워크 시트를 다른 사람에게 전달하기 전에 처리해야합니다. 그가 필요로하는 것은 워크 시트에있는 수식의 전부는 아니지만 대부분을 제거하는 것입니다. 선택한 셀 범위의 모든 셀을 단계별로 살펴보고 셀에 수식이 포함 된 경우 해당 수식을 확인하려고합니다. 수식에 현재 통합 문서의 다른 워크 시트에 대한 참조 (모든 참조)가 포함되어 있으면 해당 수식이 무시됩니다. 공식에 이러한 참조가 포함되지 않은 경우 매크로는 공식을 공식 결과로 바꿔야합니다.

이것은 비교적 간단한 작업입니다. 당신이해야 할 일은 매크로가 셀을 통과하고 셀에 수식이 포함되어 있는지 확인하는 것입니다. 그렇다면 수식에 느낌표가 포함되어 있는지 확인하십시오. 느낌표는 다음과 같은 수식 참조에 사용됩니다.

=Sheet2!A1

따라서 수식에 느낌표가 포함되어 있으면 무시해도됩니다. 느낌표가 포함되지 않은 경우 값으로 바꿀 수 있습니다.

Sub ConvertFormulas1()

Dim c As Variant     Dim frm As String

On Error Resume Next

For Each c In Selection         If c.HasFormula Then             frm = c.Formula             If InStr(1, frm, "!") = 0 Then                 c.Value = c.Value             End If         End If     Next c End Sub

이 방법에는 한 가지 단점이 있습니다. 다른 통합 문서에있는 수식을 포함하여 현재 워크 시트 외부의 모든 수식에 느낌표가 나타납니다. 현재 통합 문서의 다른 워크 시트로만 수식을 바꾸고 다른 통합 문서의 시트를 참조하는 수식을 무시하려면 몇 가지 추가 논리를 추가해야합니다. Excel이 다른 통합 문서를 참조하는 방법을 살펴보면 논리가 명확 해집니다.

=[OtherWorksheet.xls]Sheet1'!$C$9

다른 통합 문서의 이름은 대괄호 안에 포함되어 있습니다.

따라서 느낌표 (참조가 다른 워크 시트에 대한 참조임을 알려주는 느낌표)를 테스트 한 후 왼쪽 대괄호가 있는지 확인해야합니다.있는 경우 현재 통합 문서 내의 셀에 대한 참조가 아닙니다.

Sub ConvertFormulas2()

Dim c As Variant     Dim OtherSheet As Boolean     Dim frm As String

On Error Resume Next

For Each c In Selection         If c.HasFormula Then             frm = c.Formula             OtherSheet = False             If InStr(1, frm, "!") Then                 OtherSheet = True                 If InStr(1, frm, "[") Then                     OtherSheet = False                 End If             End If             If Not OtherSheet Then                 c.Value = c.Value             End If         End If     Next c End Sub

이 매크로에 사용 된 공식을 수정하는 것이 상대적으로 쉬워서 모든 외부 참조가 제거되도록 현재 워크 시트에 대한 참조는 그대로 유지됩니다. 실제로해야 할 일은 대괄호 검사를 제거한 다음 OtherSheet 변수를 검사하는 구조에서 “Not”키워드를 제거하는 것입니다.

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다. .

link : / excelribbon-ExcelTipsMacros [여기를 클릭하여 해당 특별 페이지를 새 브라우저 탭].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (12158)은 Microsoft Excel 2007, 2010, 2013 및 2016에 적용됩니다.

Excel의 이전 메뉴 인터페이스에 대한이 팁의 버전은 여기에서 찾을 수 있습니다.

link : / excel-Replacing_Some_Formulas_with_the_Formula_Results [일부 수식을 수식 결과로 바꾸기].