Hướng dẫn em mở rộng link tìm danh mục vật tư

[Bong05]

Em có tải 1 file nhập xuất tồn về . Hiện nay em rất muốn sử dụng file này. Tuy nhiên trong quá trình xử dụng cái nút ô vuông tìm danh mục vật tư có rất ít. Mà em thì muốn mở rộng thêm rất nhiều. Mong anh chị có thể chỉ bảo, giúp đỡ ạ!

 

[kongcom]

Bạn đọc kĩ điều 7 trong Sheet hướng dẫn của THANH NHAN nhé .

7/. Dĩ nhiên, khi phát sinh khách hàng mới hay mặt hàng mới bạn cần phải vào DMKhachHang và TongHopNX đăng ký cũng như đặt MK, MH

Làm xong thì tự động danh sách sẽ nới rộng ra thôi .

Nên nhớ danh mục khách hàng và danh mục hàng hóa phải nhập cả cột mã bên cạnh . Chắc là em chưa nhập mã nên chức năng lọc của công thức không hoạt động .

 

[Bong05]

Bạn đọc kĩ điều 7 trong Sheet hướng dẫn của THANH NHAN nhé .

7/. Dĩ nhiên, khi phát sinh khách hàng mới hay mặt hàng mới bạn cần phải vào DMKhachHang và TongHopNX đăng ký cũng như đặt MK, MH

Làm xong thì tự động danh sách sẽ nới rộng ra thôi .

Không ạ, Danh sách em đã vào rồi đó ạ. Nhưng vẫn ko nới rộng trong thanh tìm danh mục đó! Em thử rồi ko đc mới cầu cứu mà.

 

[ptm0412]

Thứ nhất:
Danh mục mât hàng trong TonghopNX đã thêm nhưng mới thêm tên, chưa có mã. Danh mục KH chỉ mới có đến dòng 15, STT 09. Sẽ hiện ra 1 số khỏang trống bên dưới.
Thứ hai: ngày tháng cột B của NhatkyNX là ngày nhưng định dạng text nên tiêu đề NhatkyNX và Thekho bị sai.
Thứ ba: Khi DM Khachhang và DM hàng bên TonghopNX tăng lên ngoài phạm vi bảng đóng khung sẵn, các các danh sách mới sẽ không được tự cập nhât. Vì:

Bảng tính sử dụng combobox mà ListFillRange của nó là cố định.
Ngoài ra mỗi cell 1 cái combobox như vậy, nếu thêm dòng thì dòng mới sẽ không có combobox, không có được DS dò tìm.
Biện pháp combobox này không khả thi đối với dữ liệu nhiều. Lẽ ra nên sử dụng validation, nhưng validation chỉ cho thấy mã, không thấy tên.
Có thể dùng 1 combobox kèm theo 1 đoạn code để combobox chạy theo cell chọn (trong nguyên cột đó).
File này chỉ là 1 gợi ý, không dùng luôn được. Muốn dùng bạn phải hiểu nó và thêm bớt, gia giảm, chỉnh sửa khi cần thiết.

 

[anhtuan1066]

Tác giã file này đã quá phí khi xài mỗi cell 1 ComboBox... Các bạn xem thử file này có giúp ích gì dc ko? (File này ko lập trình gì cã)
Chú ý:
1> Sheet1: Khi bạn nhập vào mã mới, chỉ cần đóng và lưu file, sau đó mỡ lại sẽ thấy mã dc cập nhật vào ComboBox (vì đây là đặc tính cũa ComboBox, nó ko cập nhật lập tức)
2> Bên Sheet2: chỉ cần chọn vào 1 cell, rồi chọn mã trong ComboBox thì dữ liệu sẽ luôn dc nhập vào đúng cột A
Mến
ANH TUẤN

 

[dragon PP]

Thứ nhất:
Danh mục mât hàng trong TonghopNX đã thêm nhưng mới thêm tên, chưa có mã. Danh mục KH chỉ mới có đến dòng 15, STT 09. Sẽ hiện ra 1 số khỏang trống bên dưới.
Thứ hai: ngày tháng cột B của NhatkyNX là ngày nhưng định dạng text nên tiêu đề NhatkyNX và Thekho bị sai.
Thứ ba: Khi DM Khachhang và DM hàng bên TonghopNX tăng lên ngoài phạm vi bảng đóng khung sẵn, các các danh sách mới sẽ không được tự cập nhât. Vì:

Bảng tính sử dụng combobox mà ListFillRange của nó là cố định.
Ngoài ra mỗi cell 1 cái combobox như vậy, nếu thêm dòng thì dòng mới sẽ không có combobox, không có được DS dò tìm.
Biện pháp combobox này không khả thi đối với dữ liệu nhiều. Lẽ ra nên sử dụng validation, nhưng validation chỉ cho thấy mã, không thấy tên.
Có thể dùng 1 combobox kèm theo 1 đoạn code để combobox chạy theo cell chọn (trong nguyên cột đó).
File này chỉ là 1 gợi ý, không dùng luôn được. Muốn dùng bạn phải hiểu nó và thêm bớt, gia giảm, chỉnh sửa khi cần thiết.

có thể hướng dẫn chi tiết đoạn code đó không ạ, em thấy file này rât tiện cho công việc của em la thủ kho...em đang xài excel 2007, không vào được VBA..( báo lỗi ...lost VBA...). Xin vui lòng hướng dẫn vì em không rành về những phần này, thanks

 

[hoangdanh282vn]

có thể hướng dẫn chi tiết đoạn code đó không ạ, em thấy file này rât tiện cho công việc của em la thủ kho...em đang xài excel 2007, không vào được VBA..( báo lỗi ...lost VBA...). Xin vui lòng hướng dẫn vì em không rành về những phần này, thanks

Bạn xem code sau :

Private Sub ComboBox1_Change()
ActiveCell = Me.ComboBox1
End Sub

Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Rows.Count + Target.Columns.Count > 2 Then Exit Sub
If Not Intersect(Target, [A2:A65536]) Is Nothing And _
            Application.CutCopyMode = False Then
    With Me.ComboBox1
        .Left = Target.Left
        .Top = Target.Top
        .Width = Target.Width
        .Height = Target.Height
        .ListFillRange = ""
        .ListFillRange = "DMTK"
        .LinkedCell = ActiveCell
    End With
End If
End Sub

Bạn bấm Alt+F11 để xem code trong file đính kèm nha