>주제 >excel >Excel은 여러 워크시트의 함수 계산 결과를 숫자 값으로 변환합니다.

Excel은 여러 워크시트의 함수 계산 결과를 숫자 값으로 변환합니다.

WBOY
WBOY앞으로
2022-07-13 11:41:557351검색

이 글에서는 excel에 대한 관련 지식을 제공합니다. 여기서는 단일 워크시트의 수식을 수치 값으로 변환하는 방법, 여러 워크시트의 함수 계산 결과를 수치 값으로 변환하는 방법, 여러 워크시트의 함수 계산 결과를 수치 값으로 변환하는 방법에 대한 관련 문제를 주로 정리합니다. 워크시트 수식을 숫자 값으로 변환하는 방법, 여러 통합 문서의 수식을 숫자 값으로 변환하는 방법 등을 살펴보세요. 모두에게 도움이 되기를 바랍니다.

Excel은 여러 워크시트의 함수 계산 결과를 숫자 값으로 변환합니다.

관련 학습 권장 사항: excel 튜토리얼

여러 워크시트의 함수 계산 결과를 숫자 값으로 변환하는 방법은 무엇입니까? 오늘 나는 당신과 함께 이런 유형의 문제에 초점을 맞출 것입니다. 작업 범위에 따라 세 가지 상황으로 나눌 수 있습니다.

  • 단일 워크시트에서 수식을 숫자 값으로 변환

  • 여러 워크시트에서 수식을 숫자 값으로 변환

  • 여러 통합 문서에서 수식을 숫자 값으로 변환

1. 면적 공식을 수치로

먼저 얘기해보자면 첫 번째 경우에는 면적 함수 계산 결과가 수치로 변환됩니다. 이것은 가장 일반적이며 작업은 비교적 간단합니다. 대상 영역을 복사하고 마우스 오른쪽 버튼을 클릭한 후 선택적으로 값을 붙여넣습니다.

작업 애니메이션은 다음과 같습니다.

Excel은 여러 워크시트의 함수 계산 결과를 숫자 값으로 변환합니다.

2. 다중 시트 수식을 숫자 값으로 변환

현재 통합 문서의 모든 워크시트의 수식을 숫자 값으로 변환하려면 VBA를 사용해야 합니다. 암호. 참조 코드는 다음과 같습니다.

Sub FunctionTransValue_Sheets()
Dim sht As Worksheet
For Each sht In Worksheets '遍历工作表
sht.UsedRange.Value = sht.UsedRange.Value
Next
End Sub

3~5번째 코드 줄은 워크시트를 순회하며, 4번째 코드 줄은 셀의 값을 해당 값으로 변경하여 수식 내용을 제거합니다.

3. 수식을 여러 통합 문서의 값으로 변환

폴더 아래 여러 통합 문서의 값을 변환하는 수식을 지정하세요. 다음 코드를 복사하여 실행할 수 있습니다.

Sub FunctionTransValue_Workbooks() '全部工作簿
Dim strPath As String, sht As Worksheet
Dim strWbName As String, wb As Workbook
With Application.FileDialog(msoFileDialogFolderPicker) '获取文件夹路径
If .Show Then strPath = .SelectedItems(1) & "\" Else Exit Sub
End With
On Error Resume Next
With Application
.ScreenUpdating = False '取消屏幕刷新
.DisplayAlerts = False '取消警告信息
.EnableEvents = False '取消事件
.Calculation = xlCalculationManual '取消公式重算
.AskToUpdateLinks = False '取消外链询问
End With
strWbName = Dir(strPath & "*.xls*")
Do While strWbName <> "" &#39;dir语句遍历excel文件
If strWbName <> ThisWorkbook.Name Then
Set wb = Workbooks.Open(strPath & strWbName) &#39;打开工作簿
For Each sht In wb.Worksheets &#39;遍历工作表公式转数值
sht.UsedRange.Value = sht.UsedRange.Value
Next
wb.Close True &#39;保存关闭工作簿
End If
strWbName = Dir() &#39;下一个excel文件
Loop
With Application &#39;恢复系统设置
.ScreenUpdating = True
.DisplayAlerts = True
.EnableEvents = True
.Calculation = xlCalculationAutomatic
.AskToUpdateLinks = True
End With
If Err.Number Then
MsgBox Err.Description
Else
MsgBox "转换完成。"
End If
End Sub

코드는 다음과 같이 분석됩니다

Lines. 4~6에서는 사용자가 대상 폴더를 선택하고 폴더 경로를 얻을 수 있습니다.

라인 8~14는 일련의 시스템 설정을 취소합니다.

코드의 15~25행은 조건부 루프 문 + DIR 함수를 사용하여 통합 문서를 탐색합니다. 코드의 19~21행은 워크시트를 탐색하여 수식을 숫자 값으로 변환합니다.

라인 26~32는 일련의 시스템 설정을 복원합니다.

코드의 33~37행은 프로그램 실행 결과를 피드백합니다.

관련 학습 권장 사항: excel 튜토리얼

위 내용은 Excel은 여러 워크시트의 함수 계산 결과를 숫자 값으로 변환합니다.의 상세 내용입니다. 자세한 내용은 PHP 중국어 웹사이트의 기타 관련 기사를 참조하세요!

성명:
이 기사는 excelhome.net에서 복제됩니다. 침해가 있는 경우 admin@php.cn으로 문의하시기 바랍니다. 삭제