동일한 셀 내에서 최대 값을 찾기 위해 수식을 엑셀에 가장 오른쪽 숫자의 여러 값이 있습니다.

비쉬

여러 값을 가진 동일한 셀에서 가장 오른쪽에있는 숫자의 최대 값과 최소값을 찾고 싶습니다. 아래는 데이터가 어떻게 보이는지입니다. 이 모든 값은 동일한 셀에 있습니다. 예 : "A1"셀에서 1.00,1.5,1.5,1.0,2.00,1.50,1.0,1.00과 같은 맨 오른쪽 숫자를 추출하여 최대 값과 최소값을 찾고 싶습니다. 현재 Excel 2016 버전을 사용하고 있습니다.

BAEK1928_TXL_1.00
44444922_FLR2X-A_1.5
44447922_FL2X-B_1.5
44444922_FL2X-B_1.0
BAEK1928_TXL_2.00
44444922_FLR2X-B_1.50
44444922_FLR2X-A_1.0
44444922_FLRY-B_1.00

여기에 이미지 설명 입력

Excel 공식 또는 vba 코드가 있습니까?

나는 아래와 같이 엑셀 공식을 시도했지만 필요에 따라 작동하지 않습니다.

=MAX(RIGHT(A1,LEN(A1)-FIND("_",A1,SEARCH("_",A1)+1))

코드가 작동하지 않는 아래의 데이터 샘플 :

KMO6722-1_THICK_0.50
MAEJ9120_GXL_0.50
BIN76822_FLRY-B_0.50
KMO6722-1_THIN_0.50
MAEJ9120_TXL_0.50
KL STLE 2987_0.5
MAEJ9120_SXL_0.50
DIN76722_FLRY-A_0.50

MAEJ9120_TXL_1.00
KMO6722-1_FLR2X-B_1.00
MAEJ9120_GXL_1.00
BIN76822_FL2X-B_1.0
MAEJ9120_GXL_0.50
MAEJ9120_GXL_0.80
BIN76822_FLR2X-A_1.0
BIN76822_FLRY-B_1.00
MAEJ9120_TXL_0.80
KMO6722-1_FLR2X-B

MIL-STD-104_PTFE_2.0
BIN76822 _THIN_1.00
BIN76822 _THIN_2.00
MIL-STD-104_PTFE_1.0
MAEJ9120_TXL_0.80
BIN76822_FLRY-B_1.50
BIN76822-1_FLR2X-B
MAEJ9120_TXL_1.00_Sn
PLAIN_EXRD_1.00
MAEJ9120_TXL_2.00_Sn
MAEJ9120_TXL_0.80_Sn
BIN76822_TXL_1.00
BIN76822_THIN_1.50

오류 스냅 샷 아래 :

여기에 이미지 설명 입력

shrivallabha.redij

다음은 VBA 기반 기능입니다. VBA에 모듈을 삽입하고 코드 아래에 붙여 넣어야합니다.

Public Function GetMinMax(strInput As String, Optional varMode)
    Dim strMode As String
    If IsMissing(varMode) Then
        strMode = "MAX"
    Else
        strMode = varMode
    End If
    Dim varInput
    varInput = Split(strInput, Chr(10))
    Dim varOut() As Double
    Dim i As Long
    ReDim varOut(UBound(varInput))
    For i = LBound(varInput) To UBound(varInput)
        varOut(i) = Split(varInput(i), "_")(2)
    Next i
    If strMode = "MAX" Then
        GetMinMax = Application.Max(varOut)
    Else
        GetMinMax = Application.Min(varOut)
    End If
End Function

MAX를 얻으려면 다음을 사용할 수 있습니다.

=GetMinMax(A1) 또는 =GetMinMax(A1,"MAX")

MIN의 경우 다음을 사용할 수 있습니다.

=GetMinMax(A1,"MIN")

이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.

침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제

에서 수정
0

몇 마디 만하겠습니다

0리뷰
로그인참여 후 검토

관련 기사

Related 관련 기사

뜨겁다태그

보관