Giúp Code hoặc công thức tìm số lượng lớn nhất trong Mã Hàng (2 người xem)

[minhtuan55]

Chào cả nhà GPE ! Em cần công thức hoặc code tìm Số lượng lớn nhất trong mã hàng ( sau đó + 1 ) . rất mong mọi người giúp đở. Em xin chân thành cảm ơn

 

[Nhất Chi Lan]

Chào cả nhà GPE ! Em cần công thức tìm Số lượng lớn nhất trong mã hàng. rất mong mọi người giúp đở. Em xin chân thành cảm ơn
View attachment 233337

Bạn thử

=MAX(--SUBSTITUTE($B$4:$B$13;"ABC";""))

Kết thúc bằng Ctr+Shift+Ent

 

[minhtuan55]

Bạn thử

=MAX(--SUBSTITUTE($B$4:$B$13;"ABC";""))

Kết thúc bằng Ctr+Shift+Ent

có cách nào không dùng Mãng được không bạn. Mà sao mình xóa vào dòng trống thì Báo lỗi. Mong bạn kiểm tra lại. xin chân thành cảm ơn !

 

[PacificPR]

có cách nào không dùng Mãng được không bạn. Mà sao mình xóa vào dòng trống thì Báo lỗi. Mong bạn kiểm tra lại. xin chân thành cảm ơn !
View attachment 233340

Chắc không dùng "mãng" thì dùng cột phụ. Đấy là ý em thôi nhé

 

[minhtuan55]

Chắc không dùng "mãng" thì dùng cột phụ. Đấy là ý em thôi nhé

Dùng code cũng được không bác

 

[VetMini]

Chắc không dùng "mãng" thì dùng cột phụ. Đấy là ý em thôi nhé

Thớt này khó tính lắm. Và thớt cũng đủ kinh nghiệm để biết rằng "cái gì đòi hỏi ở GPE đều sẽ có người sẵn sàng vận não giùm". Cho nên cứ việc đòi.

Bạn thử

=MAX(--SUBSTITUTE($B$4:$B$13;"ABC";""))

Kết thúc bằng Ctr+Shift+Ent

Hàm này không đáp ứng được nếu trong cột có nhiều mã.

 

[PacificPR]

Dùng code cũng được không bác

Ơ ơ lại sang code mất rồi.Code bài này thì với khả năng của Anh thì dư rồi còn gì nữa mà hỏi em

 

[VetMini]

Ơ ơ lại sang code mất rồi.Code bài này thì với khả năng của Anh thì dư rồi còn gì nữa mà hỏi em

Xê cọng cọng thì thớt rất xịn, nhưng có lẽ vì vậy mà Vê Bê A thì thớt không muốn bẩn tay. Hỏi Giê Pê E thiếu gì người xẵn sàng xăn tay áo.

 

[SA_DQ]

VBA ư, xin mời thử với cái ni

Sub TimMaMax()
Dim Rng As Range, sRng As Range:               Dim Num As Long, Tmp As Long
Dim MyAdd As String, MaMax As String

Set Rng = [B4].CurrentRegion
Set sRng = Rng.Find("ABC", , xlFormulas, xlPart)
If Not sRng Is Nothing Then
    MyAdd = sRng.Address
    Do
        Tmp = CLng(Mid(sRng.Value, 4, Len(sRng.Value)))
        If Tmp > Num Then
            MaMax = sRng.Value:                         Num = Tmp
        End If
        Set sRng = Rng.FindNext(sRng)
    Loop While Not sRng Is Nothing And sRng.Address <> MyAdd
End If
MsgBox MaMax
End Sub

 

[Nhất Chi Lan]

Cho em câu câu 1 cái nhé

 

[VetMini]

Cho em câu câu 1 cái nhé
<CODE=
Function Civid19(ParamArray sArr()) As String
Dim I As Long, Cll As Range, Numb
...

Câu thì câu, nhưng ở đâu bị "tê" vậy?

 

[HieuCD]

Cho em câu câu 1 cái nhé

Function Civid19(ParamArray sArr()) As String
    Dim I As Long, Cll As Range, Numb
    Dim T, Rslt, Str As String, Strmax As String, Idx As Long
For I = LBound(sArr) To UBound(sArr)
    T = sArr(I)
    If TypeOf sArr(I) Is Range Then
        For Each Cll In sArr(I).Cells
            For Idx = 1 To Len(Cll)
                If Not IsNumeric(Mid(Cll, Idx, 1)) Then Str = Str & Mid(Cll, Idx, 1) Else Exit For
            Next Idx
            Rslt = Replace(Cll, Str, "")
            If Val(Rslt) > Val(Numb) Then
                Numb = Rslt:   Strmax = Str
            End If
            Str = ""
        Next Cll
    Else
        For Idx = 1 To Len(sArr(I))
            If Not IsNumeric(Mid(sArr(I), Idx, 1)) Then Str = Str & Mid(sArr(I), Idx, 1) Else Exit For
        Next Idx
        Numb = Replace(sArr(I), Str, "")
        If Rslt > Numb Then
            Numb = Rslt:   Strmax = Str
        End If
        Str = ""
    End If
Next I
If Numb Then Civid19 = Strmax & Numb + 1
End Function

Rút gọn phần code giống nhau được không bạn

 

[huonglien1901]

Chào cả nhà GPE ! Em cần công thức hoặc code tìm Số lượng lớn nhất trong mã hàng ( sau đó + 1 ) . rất mong mọi người giúp đở. Em xin chân thành cảm ơn

View attachment 233343

="ABC"&""&1+AGGREGATE(14,6,(--(SUBSTITUTE($A$1:$A$3,"ABC","")))/(ROW($1:$3)^0),1)

 

[huyyeu99]

Thấy các bạn vận dụng công thức ngưỡng mộ thật.

 

[PacificPR]

Thấy các bạn vận dụng công thức ngưỡng mộ thật.

Chị đẹp lại chọc quê bọn em nữa

 

[huyyeu99]

Mình nói thiệt đó phải hiểu rõ mới sử dụng công thức linh hoạt được. Mình không làm được mới ngưỡng mộ mấy bạn