lọc số liệu tự động (2 người xem)

Liên hệ QC

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

ngoctung88_06

Thành viên mới
Tham gia
23/2/09
Bài viết
16
Được thích
0
Nghề nghiệp
Dieu hoa oto
em có một file với hai sheet, sheet 01 do em tạo còn sheet 2 là số liệu tồn kho em lấy từ phần mềm kế toán, giờ có bác nào giúp em lấy được số lượng hàng tồn kho chính xác từ sheet 2 qua cột yêu cầu ( bôi xanh ) ở sheet 01. Em cảm ơn rất nhiều, nếu giải thíck nữa thì em thank nhiều và hậu tạ. +-+-+-+ ( em còn non tay nghề lắm ). rất mong mọi người giúp đỡ.
 

File đính kèm

em có một file với hai sheet, sheet 01 do em tạo còn sheet 2 là số liệu tồn kho em lấy từ phần mềm kế toán, giờ có bác nào giúp em lấy được số lượng hàng tồn kho chính xác từ sheet 2 qua cột yêu cầu ( bôi xanh ) ở sheet 01. Em cảm ơn rất nhiều, nếu giải thíck nữa thì em thank nhiều và hậu tạ. +-+-+-+ ( em còn non tay nghề lắm ). rất mong mọi người giúp đỡ.
Bạn dùng hàm này:=IF(ISERROR(VLOOKUP(B8,'TON KHO'!$B$2:$E$3055,4,0)),0,(VLOOKUP(B8,'TON KHO'!$B$2:$E$3055,4,0)))
 
em có một file với hai sheet, sheet 01 do em tạo còn sheet 2 là số liệu tồn kho em lấy từ phần mềm kế toán, giờ có bác nào giúp em lấy được số lượng hàng tồn kho chính xác từ sheet 2 qua cột yêu cầu ( bôi xanh ) ở sheet 01. Em cảm ơn rất nhiều, nếu giải thíck nữa thì em thank nhiều và hậu tạ. +-+-+-+ ( em còn non tay nghề lắm ). rất mong mọi người giúp đỡ.
Bạn dùng hàm Vlookup để lấy dữ liệu qua thôi:

F6=VLOOKUP(TRIM(B7),'TON KHO'!$B$2:$E$3051,4,0)

Bạn xem file nhé.
 

File đính kèm

cảm ơn các bác rất nhiều. Em làm ở cty TNHH kỹ nghệ lạnh ôtô Trần Quang ( số 9 ngõ 538 Đường Láng ). Rất vui được làm quen với mọi người. Bác nào có ôtô vào chỗ em làm điều hòa. Bảo đảm giá rẻ
 
Thêm 1 tham khảo bằng macro sự kiện tại 'Gia Tri' (Theo file của bạn)

PHP:
Option Explicit
Private Sub Worksheet_Activate()
 Dim Sh As Worksheet, Rng As Range, sRng As Range, Clls As Range, Rng0 As Range
 Dim Color_ As Byte

 Color_ = [F6].Interior.ColorIndex + 1
 [F6].Interior.ColorIndex = IIf(Color_ > 41, 34, Color_)
 Set Sh = Worksheets("Ton Kho")
 Set Rng = Sh.Range(Sh.[B1], Sh.[B65500].End(xlUp))
 Set Rng0 = Range([B7], [B65500].End(xlUp))
 Rng0.Offset(1, 4).Interior.ColorIndex = 0
 For Each Clls In Rng0
   Set sRng = Rng.Find(Trim(Clls.Value), , xlFormulas, xlPart)
   With Clls.Offset(, 4)
      If sRng Is Nothing Then
         .Interior.ColorIndex = Color_
      Else
         .Value = sRng.Offset(, 3).Value
      End If
   End With
 Next Clls
End Sub
Một khi đã gài macro này đúng nơi rồi thì khỏi phải núm & kéo công thức từ trên xuống dưới luôn! Mà cứ mở trang tính 'Gia Tri' là thấy số liệu liền hà.
(Với lại, tìm không thấy mã, nó tô màu, chứ không báo lỗi hay phải bẫy lỗi như công thức)
Macro này càng ưa làm việc với Cơ Sở dữ liệu lớn, chứ không như công thức!--=0

Vui nha!
 
Cám ơn anh. Nhưng khổ nỗi em còn non mà marco thì em chưa biết gì ah, có sách nào hướng dẫn cái đó không anh.
 
Web KT

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

Back
Top Bottom