Xin hỏi cách gọi vùng dữ liệu theo điều kiện từ 1 sheet khác

[khoahoc78]

Xin được giúp đỡ
- Mình có 2 sheet :
+ Sheet1 : Nhập thông tin lí lịch từng người (thông tin mỗi người khoảng 10 dòng từ cột A đến cột F. Thông tin liên tục từ người đầu tiên đến người cuối cùng.)
+ Sheet 2 : Xem lí lịch cá nhận từng người khi chọn từ (xem thông tin toàn vùng dữ liệu của người đó) trên vùng chỉ định A2:f11 của sheet 2.
+ Điều kiện ở đây chỉ cần nhập stt của nhân viên vào ô A1 của sheet 2 (có thể viết code cho nút combobox khi chọn đúng số thứ tự)

Xin cảm ơn trước.

 

[nghiaphuc]

Mình nghĩ việc này chỉ cần dùng hàm trong Excel là được chứ đâu cần gì tới code. Bạn có thể sử dụng linh hoạt các hàm VLOOKUP, HLOOKUP, INDEX, MATCH là được mà. Nếu chưa đúng ý bạn thì đưa 1 file mẫu lên đi, mọi người mới hình dung được yêu cầu cụ thể của bạn là như thế nào.

 

[khoahoc78]

Cảm ơn nhiều, mình đưa file lên cố gắng giúp mình.

 

[khoahoc78]

Truy hồi DL đến từ Sheets khác

Mong được giúp đỡ cách lấy dữ liệu từ sheets khác khi chọn số thứ tự
Xin cảm ơn nhiều.

 

[ndu96081631]

Mong được giúp đỡ cách lấy dữ liệu từ sheets khác khi chọn số thứ tự
Xin cảm ơn nhiều.

Cái bạn muốn chắc giống cái này chăng:



Nếu thế thì chỉ dùng VLOOKUP, OFFSET và MATCH để làm bài này thôi nhé! Xem file

 

[concogia]

Mong được giúp đỡ cách lấy dữ liệu từ sheets khác khi chọn số thứ tự
Xin cảm ơn nhiều.

1- Bạn lọc theo điều kiện là Số thứ tự thì không cần phải combo box hay validation gì cả vì có gì phức tạp đâu có sợ nhầm lẫn
2- Nếu muốn code thì có thể xài cái này: Right click sheet Li lich ==> View Code ==> chép cái này vào ( Đặt tên sheet bạn đừng nên để có dấu)

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then
        Dim Vung As Range, Ws As Worksheet, I As Integer
            Set Ws = Sheets("li lich")
            Set Vung = Ws.Range(Ws.[a1], Ws.[a10000].End(xlUp))
                For I = 1 To Vung.Rows.Count Step 8
                    If Vung(I) = [a1] Then Vung(I).Resize(8, 3).Copy [a1]: Exit Sub
                Next
    End If
End Sub

Cứ nhập số muốn lấy dữ liệu ở cell A1 ở sheet "Xem" rồi .....xem kết quả

 

[khoahoc78]

Cảm ơn concogia nhưng sao mình đổi tên sheet Li lich và chép Code vào thì thấy không động tỉnh gì cả, khi nhập ở cột A sheet Xem. Hay mình thao tác sai sao. Mong chỉ dẫn thêm.

 

[khoahoc78]

Cảm ơn ndu96081631 Cái nút Drop Down ở chỗ nào mình không tìm ra được nhỉ. Mong được giúp đỡ

 

[concogia]

Cảm ơn concogia nhưng sao mình đổi tên sheet Li lich và chép Code vào thì thấy không động tỉnh gì cả, khi nhập ở cột A sheet Xem. Hay mình thao tác sai sao. Mong chỉ dẫn thêm.

Trong bài của bạn mình đã đổi tên sheet "Lí lịch" thành "Li lich", bạn xem lại xem tên mới đổi có giống với tên trong code không chứ thao tác đó đơn giản mà
Set Ws = Sheets("li lich")
Bạn đổi tên sheet cho giống trong code hoặc đổi trong code theo ý của bạn cũng được mà
Hy vọng bạn làm được
Thân

 

[nghiaphuc]

Cảm ơn ndu96081631 Cái nút Drop Down ở chỗ nào mình không tìm ra được nhỉ. Mong được giúp đỡ

Bạn chọn View\Toolbars\Forms sẽ thấy đối tượng Combo Box để vẽ nên cái nút mà bạn đang nói đến.
Bạn thử nháy chuột phải trên đối tượng này (trong file của ndu), chọn Format Control, chọn tab Control, bạn sẽ tự khám phá ra thôi.
Chúc thành công!