Mọi người giúp mình cách xoá bỏ dữ liệu trùng trong 1 cột. (9 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

Đang trực tuyến: 1 (Thành viên: 0, Khách: 1)
H

hungảu

Thành viên mới
Tham gia
13/1/09
Bài viết
5
Được thích
0
Mọi người giúp mình với tìm đang gặp rắc rối với vấn đề này tìm hiểu mấy ngày rồi mà không ra nên nhờ các bạn ở giải pháp excel giúp đỡ.%#^#$
dữ liệu mình ví dụ như sau:

A
B
C
A
----> sau khi lọc và xóa
B
C
sau khi lọc chỉ còn những dữ liệu không trùng thôi, xóa các dữ liệu bị trùng. Dữ liệu trên 1 cột thôi các bạn nha. Mong các bạn giúp đỡ !!$@!!
 
Bạn dùng hàm countif() tại cột bên cạnh để kiểm tra em nào xuất hiện nhiều hơn 1 lần, sau đó dùng autofilter xoá
 
quanghai1969 đã viết:
Bạn dùng hàm countif() tại cột bên cạnh để kiểm tra em nào xuất hiện nhiều hơn 1 lần, sau đó dùng autofilter xoá
Nhấp chuột vào đây để mở rộng...

Quang Hài làm thử bài này bằng VBA xem!
Cũng khá hay nếu như có thể giải quyết được với ít lần lập nhất (không dùng WorksheetFunction để kiểm tra nha)
Ẹc... Ẹc...
 
cảm ơn bạn. nhưng nếu thế mình có thể dùng "remove duplicates" để xóa những dữ liệu trùng. ý mình là xóa luôn những cái bị trùng còn cái không trùng thôi.

A
B
C
A
----> sau khi lọc và xóa
B
C

BạN GIúP MìNH NHA!%#^#$
 
hungau đã viết:
cảm ơn bạn. nhưng nếu thế mình có thể dùng "remove duplicates" để xóa những dữ liệu trùng. ý mình là xóa luôn những cái bị trùng còn cái không trùng thôi.

A
B
C
A
----> sau khi lọc và xóa
B
C

BạN GIúP MìNH NHA!%#^#$
Nhấp chuột vào đây để mở rộng...

Dùng countif() nếu lớn hơn hoặc = 2 thì xóa đi, thì nó ra như Kết qủa bạn muốn mà!
 
hungau đã viết:
cảm ơn bạn. nhưng nếu thế mình có thể dùng "remove duplicates" để xóa những dữ liệu trùng. ý mình là xóa luôn những cái bị trùng còn cái không trùng thôi.

A
B
C
A
----> sau khi lọc và xóa
B
C

BạN GIúP MìNH NHA!%#^#$
Nhấp chuột vào đây để mở rộng...
Bạn có cố tìm hiểu những gì mình diễn tả chưa?
1. Dùng hàm countif() để đếm số lần xuất hiện của dữ liệu
2. Dùng autofilter lọc theo dk khác 1
3. Xoá cả dòng hay xoá thế nào đó tuỳ bạn

... Buồn
 
ok, mình thử và được rồi bạn. cảm ơn bạn nha!
 
ndu96081631 đã viết:
Quang Hài làm thử bài này bằng VBA xem!
Cũng khá hay nếu như có thể giải quyết được với ít lần lập nhất (không dùng WorksheetFunction để kiểm tra nha)
Ẹc... Ẹc...
Nhấp chuột vào đây để mở rộng...
Cũng hơi khó đối với khả năng của em nhưng cố hết sức để anh thấy đàn em của anh tiến bộ hơn trước. Góp ý cho em nha.
PHP: 
Sub khong_trung()
Dim dic1 As Object, dic2 As Object, i
Set dic1 = CreateObject("scripting.dictionary")
Set dic2 = CreateObject("scripting.dictionary")
dk = Range([A1], [A65536].End(3)).Value
With dic1
   For i = 1 To UBound(dk)
      If Not .exists(dk(i, 1)) Then
      .Add dk(i, 1), ""
      Else
         If Not dic2.exists(dk(i, 1)) Then dic2.Add dk(i, 1), ""
      End If
   Next
   .RemoveAll
   For i = 1 To UBound(dk)
      If Not dic2.exists(dk(i, 1)) Then .Add dk(i, 1), ""
   Next
   [b1].Resize(.Count, 1) = Application.Transpose(.keys)
End With
End Sub
 
Lần chỉnh sửa cuối:
hungau đã viết:
Mọi người giúp mình với tìm đang gặp rắc rối với vấn đề này tìm hiểu mấy ngày rồi mà không ra nên nhờ các bạn ở giải pháp excel giúp đỡ.%#^#$
dữ liệu mình ví dụ như sau:

A
B
C
A
----> sau khi lọc và xóa
B
C
sau khi lọc chỉ còn những dữ liệu không trùng thôi, xóa các dữ liệu bị trùng. Dữ liệu trên 1 cột thôi các bạn nha. Mong các bạn giúp đỡ !!$@!!
Nhấp chuột vào đây để mở rộng...
đây là bài toán lọc và rút trích tại chỗ.
 
quanghai1969 đã viết:
Cũng hơi khó đối với khả năng của em nhưng cố hết sức để anh thấy đàn em của anh tiến bộ hơn trước. Góp ý cho em nha.
PHP: 
Sub khong_trung()
Dim dic1 As Object, dic2 As Object, i
Set dic1 = CreateObject("scripting.dictionary")
Set dic2 = CreateObject("scripting.dictionary")
dk = Range([A1], [A65536].End(3)).Value
With dic1
   For i = 1 To UBound(dk)
      If Not .exists(dk(i, 1)) Then
      .Add dk(i, 1), ""
      Else
         If Not dic2.exists(dk(i, 1)) Then dic2.Add dk(i, 1), ""
      End If
   Next
   .RemoveAll
   For i = 1 To UBound(dk)
      If Not dic2.exists(dk(i, 1)) Then .Add dk(i, 1), ""
   Next
   [b1].Resize(.Count, 1) = Application.Transpose(.keys)
End With
End Sub
Nhấp chuột vào đây để mở rộng...
- Thứ nhất: Phạm luật vì dùng WorksheetFunction (như tôi nói ở trên) nha
- Thừ hai: Chưa bẫy lỗi (chẳng hạn toàn bộ dữ liệu đều trùng hoặc không có dữ liệu nào)
- Thứ ba: Dùng 1 Dictionary cũng được vậy! Chẳng hạn thế này:
Mã: 
 If Not .exists(dk(i, 1)) Then
   .Add dk(i, 1), [COLOR=#ff0000][B]1[/B][/COLOR]
  Else
   [COLOR=#ff0000][B].Item(dk(i, 1)) = .Item(dk(i, 1)) + 1[/B][/COLOR]
End If
tiếp theo ta sẽ xét thằng Key nào có Item = 1 thì lấy
vân vân....
Ẹc... Ẹc... Cố lên!
(Chủ nhật chẳng có quái gì để làm nên phải bày chuyện ra cho đở buồn --=0)
 
Lần chỉnh sửa cuối:
ndu96081631 đã viết:
- Thứ nhất: Phạm luật vì dùng WorksheetFunction (như tôi nói ở trên) nha
- Thừ hai: Chưa bẫy lỗi (chẳng hạn toàn bộ dữ liệu đều trùng hoặc không có dữ liệu nào)
- Thứ ba: Dùng 1 Dictionary cũng được vậy! Chẳng hạn thế này:
Mã: 
 If Not .exists(dk(i, 1)) Then
   .Add dk(i, 1), [COLOR=#ff0000][B]1[/B][/COLOR]
  Else
   [COLOR=#ff0000][B].Item(dk(i, 1)) = .Item(dk(i, 1)) + 1[/B][/COLOR]
End If
tiếp theo ta sẽ xét thằng Key nào có Item = 1 thì lấy
vân vân....
Ẹc... Ẹc... Cố lên!
(Chủ nhật chẳng có quái gì để làm nên phải bày chuyện ra cho đở buồn --=0)
Nhấp chuột vào đây để mở rộng...
Em giải thế này anh xem coi tạm được chưa.

PHP: 
Sub khong_trung()
Dim dic1 As Object, i, j
Set dic1 = CreateObject("scripting.dictionary")
dk = Range([A1], [A65536].End(3)).Value
ReDim arr(1 To UBound(dk), 1 To 1)
With dic1
   For i = 1 To UBound(dk)
      If Not .exists(dk(i, 1)) Then
         .Add dk(i, 1), 1
      Else
         .Item(dk(i, 1)) = .Item(dk(i, 1)) + 1
      End If
   Next
   Items = .Items:   keys = .keys
   For i = 0 To UBound(Items)
      If Items(i) = 1 Then
         j = j + 1
         arr(j, 1) = keys(i)
      End If
   Next
End With
If j Then [b1].Resize(j, 1) = arr
End Sub
 
quanghai1969 đã viết:
Em giải thế này anh xem coi tạm được chưa.

PHP: 
Sub khong_trung()
Dim dic1 As Object, i, j
Set dic1 = CreateObject("scripting.dictionary")
dk = Range([A1], [A65536].End(3)).Value
ReDim arr(1 To UBound(dk), 1 To 1)
With dic1
   For i = 1 To UBound(dk)
      If Not .exists(dk(i, 1)) Then
         .Add dk(i, 1), 1
      Else
         .Item(dk(i, 1)) = .Item(dk(i, 1)) + 1
      End If
   Next
   Items = .Items:   keys = .keys
   For i = 0 To UBound(Items)
      If Items(i) = 1 Then
         j = j + 1
         arr(j, 1) = keys(i)
      End If
   Next
End With
If j Then [b1].Resize(j, 1) = arr
End Sub
Nhấp chuột vào đây để mở rộng...
Gần được rồi đấy
Giờ Quang Hải thử với dữ liệu thế này nhé:
A1 = "A"
A2 = "B"
A3 rổng
A4 = "A"
A5 = "B"
A6 = "C"
Xong, chạy code xem thế nào!
Ngoài ra, nếu xóa hết cột A rồi chạy code thì... sao?
Ngoài ra, liệu có thể dùng phép tính nào đó để ReDim vừa đủ cho mảng Arr không? (ở trên ReDim quá thừa rồi...)
Ẹc... Ẹc...
 
ndu96081631 đã viết:
Gần được rồi đấy
Giờ Quang Hải thử với dữ liệu thế này nhé:
A1 = "A"
A2 = "B"
A3 rổng
A4 = "A"
A5 = "B"
A6 = "C"
Xong, chạy code xem thế nào!
Ngoài ra, nếu xóa hết cột A rồi chạy code thì... sao?
Ngoài ra, liệu có thể dùng phép tính nào đó để ReDim vừa đủ cho mảng Arr không? (ở trên ReDim quá thừa rồi...)
Ẹc... Ẹc...
Nhấp chuột vào đây để mở rộng...

Em sắp bị nocked out rồi, em chỉ giảm tí xíu chứ không thể làm cho vừa vặn được anh ơi
PHP: 
Sub khong_trung()
Dim dic1 As Object, i, j, arr()
Set dic1 = CreateObject("scripting.dictionary")
dk = UsedRange.Value
With dic1
   For i = 1 To UBound(dk)
      If dk(i, 1) <> "" Then
         If Not .exists(dk(i, 1)) Then
            .Add dk(i, 1), 1
         Else
            .Item(dk(i, 1)) = .Item(dk(i, 1)) + 1
         End If
      End If
   Next
   items = .items:   keys = .keys
   ReDim arr(1 To UBound(items), 1 To 1)
   For i = 0 To UBound(items)
      If items(i) = 1 Then
         j = j + 1
         arr(j, 1) = keys(i)
      End If
   Next
End With
If j Then [b1].Resize(j, 1) = arr
End Sub
 
quanghai1969 đã viết:
Em sắp bị nocked out rồi, em chỉ giảm tí xíu chứ không thể làm cho vừa vặn được anh ơi
PHP: 
Sub khong_trung()
Dim dic1 As Object, i, j, arr()
Set dic1 = CreateObject("scripting.dictionary")
dk = UsedRange.Value
With dic1
   For i = 1 To UBound(dk)
      If dk(i, 1) <> "" Then
         If Not .exists(dk(i, 1)) Then
            .Add dk(i, 1), 1
         Else
            .Item(dk(i, 1)) = .Item(dk(i, 1)) + 1
         End If
      End If
   Next
   items = .items:   keys = .keys
   ReDim arr(1 To UBound(items), 1 To 1)
   For i = 0 To UBound(items)
      If items(i) = 1 Then
         j = j + 1
         arr(j, 1) = keys(i)
      End If
   Next
End With
If j Then [b1].Resize(j, 1) = arr
End Sub
Nhấp chuột vào đây để mở rộng...
ReDim thế này là vừa đủ nè:
Mã: 
Sub Test()
  Dim sArray, Arr(), Keys, Key
  Dim tmp As String, Item
  Dim i As Long, n As Long
  sArray = Range("A1:A10000").Value
  Range("B1:B10000").ClearContents
  With CreateObject("Scripting.Dictionary")
    For Each Item In sArray
      If Len(CStr(Item)) Then
        tmp = CStr(Item)
        If Not .Exists(tmp) Then
          .Add tmp, 1
        Else
          [COLOR=#ff0000][B]If .Item(tmp) = 1 Then n = n + 1[/B][/COLOR]
          .Item(tmp) = .Item(tmp) + 1
        End If
      End If
    Next
    If .Count Then
      If .Count - n Then
        Keys = .Keys: [COLOR=#ff0000][B]n = 0[/B][/COLOR]
        [COLOR=#ff0000][B]ReDim Arr(1 To .Count - n, 1 To 1)[/B][/COLOR]
        For Each Key In Keys
          If .Item(Key) = 1 Then
            n = n + 1
            Arr(n, 1) = Key
          End If
        Next
        Range("B1").Resize(n).Value = Arr
        MsgBox n & " phan tu duoc tim thay"
      Else
        MsgBox "Tat ca du lieu deu trung"
      End If
    Else
      MsgBox "Không tìm thay du lieu nao"
    End If
  End With
End Sub
Chú ý mấy chổ màu đỏ nha!
(Nhớ khai báo biến đầy đủ chứ đồng chí... Ngoài ra cũng đừng dùng UsedRange ---> Chạy lần 2 nó chơi luôn dữ liệu mình mới lọc à)
 
Lần chỉnh sửa cuối:
Xin phép bạn quanghai1969, mình chỉnh lại chút cho vừa nhé!
Mã: 
Sub khong_trung()
Dim dic1 As Object, i As Long, j As Long, arr()
Set dic1 = CreateObject("scripting.dictionary")
dk = Range([A1], [A65536].End(3)).Value
Range([B1], [B65536].End(3)).ClearContents
With dic1
   For i = 1 To UBound(dk)
      If dk(i, 1) <> "" Then
         If Not .exists(dk(i, 1)) Then
            .Add dk(i, 1), dk(i, 1)
         Else
            .Remove dk(i, 1)
         End If
      End If
   Next
  ReDim arr(1 To .Count, 1 To 1)
     Items = .Items
   For j = 1 To .Count
     arr(j, 1) = Items(j - 1)
   Next
[B1].Resize(.Count, 1) = arr
End With
End Sub
 
tintam7251 đã viết:
Xin phép bạn quanghai1969, mình chỉnh lại chút cho vừa nhé!
Mã: 
Sub khong_trung()
Dim dic1 As Object, i As Long, j As Long, arr()
Set dic1 = CreateObject("scripting.dictionary")
dk = Range([A1], [A65536].End(3)).Value
Range([B1], [B65536].End(3)).ClearContents
With dic1
   For i = 1 To UBound(dk)
      If dk(i, 1) <> "" Then
         If Not .exists(dk(i, 1)) Then
            .Add dk(i, 1), dk(i, 1)
         Else
            .Remove dk(i, 1)
         End If
      End If
   Next
  ReDim arr(1 To .Count, 1 To 1)
     Items = .Items
   For j = 1 To .Count
     arr(j, 1) = Items(j - 1)
   Next
[B1].Resize(.Count, 1) = arr
End With
End Sub
Nhấp chuột vào đây để mở rộng...
Giờ bạn thử với dữ liệu thế này nha:
- Cell A1, A4, A7 = "A"
- Cell A2, A5, A8 = "B"
- Cell A3, A6, A9 = "C"
- Cell A10 = "D"
Chạy code của bạn xem nó ra cái gì?
Kết quả đúng sẽ là duy nhất 1 chữ "D" thôi
 
tintam7251 đã viết:
Xin phép bạn quanghai1969, mình chỉnh lại chút cho vừa nhé!
Mã: 
Sub khong_trung()
Dim dic1 As Object, i As Long, j As Long, arr()
Set dic1 = CreateObject("scripting.dictionary")
dk = Range([A1], [A65536].End(3)).Value
Range([B1], [B65536].End(3)).ClearContents
With dic1
   For i = 1 To UBound(dk)
      If dk(i, 1) <> "" Then
         If Not .exists(dk(i, 1)) Then
            .Add dk(i, 1), dk(i, 1)
         Else
            .Remove dk(i, 1)
         End If
      End If
   Next
  ReDim arr(1 To .Count, 1 To 1)
     Items = .Items
   For j = 1 To .Count
     arr(j, 1) = Items(j - 1)
   Next
[B1].Resize(.Count, 1) = arr
End With
End Sub
Nhấp chuột vào đây để mở rộng...

Code của bạn là lấy dữ liệu duy nhất mà. Nếu lọc duy nhất thì đâu cần phải nhức đầu viết code dài như thế
 
quanghai1969 đã viết:
Code của bạn là lấy dữ liệu duy nhất mà. Nếu lọc duy nhất thì đâu cần phải nhức đầu viết code dài như thế
Nhấp chuột vào đây để mở rộng...
Code đó cũng hổng phải lấy duy nhất luôn. Giải thuật code ấy là: Chưa có thì cho vào mà có rồi thì xóa bỏ. Vậy nên với những phần tử có số lần trùng là lẻ thì sẽ "bị" lấy hết... Tức code chỉ đúng khi những phần tử có số lần trùng là chẵn mà thôi
Hic...
 
Nguyên văn bởi ndu96081631
Code đó cũng hổng phải lấy duy nhất luôn. Giải thuật code ấy là: Chưa có thì cho vào mà có rồi thì xóa bỏ. Vậy nên với những phần tử có số lần trùng là lẻ thì sẽ "bị" lấy hết... Tức code chỉ đúng khi những phần tử có số lần trùng là chẵn mà thôi
Hic...
Nhấp chuột vào đây để mở rộng...
Mình khắc phục lỗi trên như sau, nhờ các bác coi dùm
Mã: 
Sub khong_trung()
On Error Resume Next
Dim dic1 As Object, i As Long, j As Long, arr(), FindNumber As Long, a As Long
Dim Memo(100) As Variant, FindOutArray As Variant
Set dic1 = CreateObject("scripting.dictionary")
dk = Range([A1], [A65536].End(3)).Value
Range([B1], [B65536].End(3)).ClearContents
a = 1
With dic1
  For i = 1 To UBound(dk)
   FindOutArray = Filter(SourceArray:=Memo, Match:=dk(i, 1), Include:=True, Compare:=vbBinaryCompare)
   FindNumber = UBound(FindOutArray)
      If dk(i, 1) <> "" Then
         If .exists(dk(i, 1)) Then
              .Remove dk(i, 1)
              Memo(a) = dk(i, 1)
            a = a + 1
         Else
           If FindNumber = -1 Then
               .Add dk(i, 1), dk(i, 1)
           End If
         End If
     End If
    Next
  ReDim arr(1 To .Count, 1 To 1)
     Items = .Items
   For j = 1 To .Count
     arr(j, 1) = Items(j - 1)
   Next
[B1].Resize(.Count, 1) = arr
End With
End Sub
 
ndu96081631 đã viết:
Gần được rồi đấy
Giờ Quang Hải thử với dữ liệu thế này nhé:
A1 = "A"
A2 = "B"
A3 rổng
A4 = "A"
A5 = "B"
A6 = "C"
Xong, chạy code xem thế nào!
Ngoài ra, nếu xóa hết cột A rồi chạy code thì... sao?
Ngoài ra, liệu có thể dùng phép tính nào đó để ReDim vừa đủ cho mảng Arr không? (ở trên ReDim quá thừa rồi...)
Ẹc... Ẹc...
Nhấp chuột vào đây để mở rộng...
Bị mấy cái "Ngoài ra" hơi bị oải.
Hổng xài mảng khỏi Redim được hông ta?
PHP: 
Public Sub GPE()
Dim Rng(), Dic As Object, I As Long, Key As Variant
With Sheet1
        .[C1:C10000].ClearContents
    If .[A65000].End(xlUp).Address = "$A$1" Then
        .[C1].Value = .[A1].Value
    Else
        Set Dic = CreateObject("Scripting.Dictionary")
            Rng = .Range(.[A1], .[A65000].End(xlUp)).Value
        For I = 1 To UBound(Rng, 1)
            If Rng(I, 1) <> "" Then
                If Not Dic.Exists(Rng(I, 1)) Then
                    Dic.Add Rng(I, 1), 1
                Else
                    Dic.Item(Rng(I, 1)) = Dic.Item(Rng(I, 1)) + 1
                End If
            End If
        Next
            For Each Key In Dic.Keys
                If Dic.Item(Key) > 1 Then Dic.Remove Key
            Next
        If Dic.Count Then .[C1].Resize(Dic.Count).Value = _
            Application.WorksheetFunction.Transpose(Dic.Keys)
    End If
End With
    Set Dic = Nothing
End Sub
"Nếu có điều chi sơ sót xin niệm tình ..." Chỉ tiếp.
Hì hì...
 
Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.
Web KT

Bài viết mới nhất

ongke0711
  • Question Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba
    • Thích
    • Yêu thích
    • Cảm ơn
16 17 18
Trả lời
346
Đọc
31K
Vandat1607
V
vsitcnh
Hỗ trợ công thức tính điểm dựa theo điều kiện. (1 người xem)
Trả lời
15
Đọc
241
Hoangkhang01213
Hoangkhang01213
M
Xin giúp đỡ làm công thức điều kiện (2 người xem)
Trả lời
2
Đọc
124
Hoangkhang01213
Hoangkhang01213
Trungvt3
Công thức trả về định dạng không như mong muốn và viết phân số trong 1 ô. (1 người xem)
Trả lời
4
Đọc
90
tigertiger
tigertiger
N
Khắc phục lỗi "The picture is too large and will be truncated"
Trả lời
10
Đọc
5K
tle2003
T
C
  • Question Question
Xin hỏi Cách viết chú thích trong vba hiển thị tiếng việt (1 người xem)
Trả lời
4
Đọc
170
ongke0711
ongke0711
B
Xin giải pháp chống sửa, xóa dữ liệu đã nhập vào từ ngày hôm trước. (1 người xem)
    • Thích
2
Trả lời
28
Đọc
7K
Hoàng Tuấn 868
H
G
Xin Code xóa Module.
Trả lời
8
Đọc
293
huhumalu
H
00029591
Cần hỗ trợ công thức tổng hợp dữ liệu không cần cột phụ Vlookup
Trả lời
3
Đọc
163
tle2003
T
D
  • Đã giải quyết
Quản lý email outlook qua VBA cần giúp đỡ (1 người xem)
2
Trả lời
22
Đọc
566
nguyendang95
N
S
Mở 2 cửa sổ riêng biệt (1 người xem)
2
Trả lời
30
Đọc
23K
sakuraluu
S
F
Nhập dấu . (chấm) ở bàn phím phụ không tự chuyển thành dấu , (phẩy) (1 người xem)
Trả lời
16
Đọc
57K
tubaodn21
tubaodn21
PhanTuHuong
Sách Lập trình VBA trong AutoCAD đã có mặt (2 người xem)
    • Thích
    • Yêu thích
2
Trả lời
21
Đọc
1K
PhanTuHuong
PhanTuHuong
L
Lỗi font khi convert từ pdf
Trả lời
3
Đọc
145
lamvu0677
L
GPE-Trợ Lý
[GPE] TALKSHOW: PHÂN TÍCH BÁO CÁO ĐỘ NHẠY SỬ DỤNG EXCEL SOLVER (2 người xem)
    • Thích
Trả lời
0
Đọc
2K
GPE-Trợ Lý
GPE-Trợ Lý
K
  • Question Question
nhờ ace giúp đỡ tự động filter và In hàng loạt từng mục trong piviot table
Trả lời
1
Đọc
128
khkkh
K
K
Xin dax tính tỷ trọng doanh thu
Trả lời
18
Đọc
805
SteveNguyen1991
S
F
  • Question Question
Tự động Merge Mail bằng VBA
Trả lời
6
Đọc
237
Hoàng Tuấn 868
H
N
Một ví dụ về XLL add-in: Tương tác với Google Gemini dưới dạng công thức bảng tính
    • Thích
Trả lời
0
Đọc
152
nguyendang95
N
H
Nhờ anh/chị giúp đỡ em viết công thức trừ dữ liệu theo FiFo
Trả lời
1
Đọc
140
HieuCD
H
Xem thêm…

Thành viên có số lượng bài viết cao nhất tháng

Thành viên có điểm tương tác cao nhất tháng

Đếm ngược thời gian

000
Ngày
00
Giờ
00
phút
00
giây
TALK SHOW: CÙNG NHẢY LAM BA ĐA VỚI HÀM LAMBDA (λ) EXCEL 365
Back
Top Bottom