Trang 1 của 2 12 CuốiCuối
Kết quả 1 đến 10 của 18

Chủ đề: Lọc dữ liệu bằng VBA

  1. #1
    Ngày tham gia
    Aug 2015
    Bài viết
    0

    Lọc dữ liệu bằng VBA

    Xin chào các anh chị trong GPE, hôm trước em có gửi một file lên diễn đàn nhờ mọi người giúp lọc dữ liệu và được giúp tạo một file lọc bằng VBA. Em sử dụng thấy thích quá nên tò mò tìm hiểu VBA và cũng muốn học thêm nay có 1 file cũng là công việc của em hay làm xin nhờ mọi người tạo code giúp để lọc bằng VBA. Vì khá dài dòng nên những yêu cầu em đều ghi trong sheet "Bao Cao" của file đính kèm. Nếu được thì mọi người cho em xin code mẫu và tài liệu học VBA với. Xin cám ơn mọi người.
    P/s: Em quên mất là em cần tạo 1 nút bấm để lọc dữ liệu theo Tháng. Nếu lọc được theo nhiều tháng thì càng tốt ạ.

  2. #2
    Sơn Tùng Guest
    Nếu lọc bằng VBA thì bạn dùng từ khoá Filter2D để tìm trên diễn đàn các bài của Ndu và Hoàng Trọng Nghĩa nha. theo mình thì kể cả code của nước ngoài mà mình biết vẫn chưa ăn được họ đâu.

  3. #3
    Ngày tham gia
    Aug 2015
    Bài viết
    674
    Trích dẫn Gửi bởi TUTTIT
    Xin chào các anh chị trong GPE, hôm trước em có gửi một file lên diễn đàn nhờ mọi người giúp lọc dữ liệu và được giúp tạo một file lọc bằng VBA. Em sử dụng thấy thích quá nên tò mò tìm hiểu VBA và cũng muốn học thêm nay có 1 file cũng là công việc của em hay làm xin nhờ mọi người tạo code giúp để lọc bằng VBA. Vì khá dài dòng nên những yêu cầu em đều ghi trong sheet "Bao Cao" của file đính kèm. Nếu được thì mọi người cho em xin code mẫu và tài liệu học VBA với. Xin cám ơn mọi người.
    P/s: Em quên mất là em cần tạo 1 nút bấm để lọc dữ liệu theo Tháng. Nếu lọc được theo nhiều tháng thì càng tốt ạ.
    Bạn làm như file sau

  4. #4
    thanhtruc02 Guest
    Cám ơn anh nginh ạ, lần trước cũng nhờ anh giúp. Liệu anh có thể cho em xin code để học hỏi được không anh

  5. #5
    thuydt Guest
    Trích dẫn Gửi bởi TUTTIT
    Cám ơn anh nginh ạ, lần trước cũng nhờ anh giúp. Liệu anh có thể cho em xin code để học hỏi được không anh
    Bạn mở file, nhấn Alt+F11 sẽ thấy code

  6. #6
    huong2211hd Guest
    Luôn tiện xin hỏi Bác Nginh với cột NGÀY trong Sheet Bao Cao: Nếu cùng ngày tháng năm chỉ hiện một lần
    (Giống kiểu gộp các NGÀY giống nhau thành 1 ô) thì làm thế nào ạ!

  7. #7
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    con de loc du lieu bang lap trinh VBA sao vay anh

  8. #8
    thomtomtit Guest
    Trích dẫn Gửi bởi tonhoangdiem
    con de loc du lieu bang lap trinh VBA sao vay anh
    Bạn chạy đoạn code sau:

    Mã:
    Sub loc()
    Dim mang() As Variant, i As Long, k As Long
    For i = 3 To 13
      If Cells(i, 4) <> 0 Then
         k = k + 1
         ReDim Preserve mang(1 To k)
         mang(k) = Cells(i, 4)
      End If
    Next i
    [G3].Resize(k) = WorksheetFunction.Transpose(mang)
    End Sub

  9. #9
    Mynamekiller Guest
    Trích dẫn Gửi bởi tonhoangdiem
    con de loc du lieu bang lap trinh VBA sao vay anh
    Một cách nửa cho bạn lựa chọn.

    Mã:
    Sub GPE()
    Dim dArr, aArr, i As Long, k As Long
        aArr = Sheet1.Range("D3", Sheet1.Range("D65000").End(3))
    ReDim dArr(1 To UBound(aArr, 1))
    For i = 1 To UBound(aArr, 1)
      If aArr(i, 1) <> 0 Then
         k = k + 1
         dArr(k) = aArr(i, 1)
      End If
    Next i
    Sheet1.[G3].Resize(k) = Application.Transpose(dArr)
    End Sub

  10. #10
    Ngày tham gia
    Aug 2015
    Bài viết
    2
    anh chi trong GPE oi ,,cho em hoi ti,lam the nao de viet VBA de loc mot cot sang cot khac xim cam on ak

Trang 1 của 2 12 CuốiCuối

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •