Tìm kiếm giá trị 1 cột???

[l0v3chun]

Mình có 1 vấn đề đã suy nghĩ từ lâu nhưng chưa tìm ra giải pháp tối ưu. Nội dung là nếu mình nhập vào ô màu vàng số 1 thì cột giá trị sẽ hiện ra tất cả các giá trị ở cột 1, nếu nhập số 2 thì nó ra cột giá trị là cột thứ 2. Tương tự với cột thứ 3.

Mong các bạn giúp đỡ! Mình sử dụng hàm if() nhưng rất mất time và công thức dài.

 

[khuongvietphong]

Bạn dùng CT này tại B4 sau đó Fill xuống dưới:

=offset($d$3,row(1:1),$a$1)

 

[l0v3chun]

Bạn dùng CT này tại B4 sau đó Fill xuống dưới:

=offset($d$3,row(1:1),$a$1)

Bạn ơi, mình đã thử rồi, nhưng khi mình nhập số 2 vào ô màu vàng (ô A1) thì nó không nhảy sang cột 2????

 

[phulien1902]

Vậy bạn thử kiểu khác đi với

Private Sub Worksheet_Change(ByVal Target As Range)
    Columns("E:G").EntireColumn.Hidden = False
    If Target.Address = "$A$1" Then
        Select Case Target.Value
        Case 1
            Columns("E:E").EntireColumn.Hidden = False
            Columns("F:G").EntireColumn.Hidden = True
        Case 2
            Columns("E:E").EntireColumn.Hidden = True
            Columns("G:G").EntireColumn.Hidden = True

        Case 3
            Columns("G:G").EntireColumn.Hidden = False
            Columns("E:F").EntireColumn.Hidden = True
        End Select
    End If
End Sub

Bạn nhập thử các số 1,2,3 vào Cell A1 xem nhé

 

[khuongvietphong]

Bạn ơi, mình đã thử rồi, nhưng khi mình nhập số 2 vào ô màu vàng (ô A1) thì nó không nhảy sang cột 2????

Sao kỳ cục vậy ta. Xem File này nha

 

[l0v3chun]

Vậy bạn thử kiểu khác đi với

Private Sub Worksheet_Change(ByVal Target As Range)
    Columns("E:G").EntireColumn.Hidden = False
    If Target.Address = "$A$1" Then
        Select Case Target.Value
        Case 1
            Columns("E:E").EntireColumn.Hidden = False
            Columns("F:G").EntireColumn.Hidden = True
        Case 2
            Columns("E:E").EntireColumn.Hidden = True
            Columns("G:G").EntireColumn.Hidden = True

        Case 3
            Columns("G:G").EntireColumn.Hidden = False
            Columns("E:F").EntireColumn.Hidden = True
        End Select
    End If
End Sub

Bạn nhập thử các số 1,2,3 vào Cell A1 xem nhé

Ý mình là nhập số 1, hoặc số 2 hoặc số 3, thì các số ở cột giá trị nó nhảy cơ bạn ơi, chứ không phải ẩn cột.

 

[l0v3chun]

Sao kỳ cục vậy ta. Xem File này nha

không được vậy ta?

 

[HieuCD]

không được vậy ta?
View attachment 157468

Nhấn phiếm F9 nó mới tính lại

 

[l0v3chun]

Nhấn phiếm F9 nó mới tính lại

ok bạn, mình đã làm đc, thanks bạn nhiều nha. Nhưng cho mình hỏi thêm, nếu mình thay số 1,2,3 bằng 1,26,51 thì khi nhập vào ô A1 =26 nó ko tìm đc giá trị??? vậy giải quyết ntn?

 

[Phuocam]

ok bạn, mình đã làm đc, thanks bạn nhiều nha. Nhưng cho mình hỏi thêm, nếu mình thay số 1,2,3 bằng 1,26,51 thì khi nhập vào ô A1 =26 nó ko tìm đc giá trị??? vậy giải quyết ntn?

Thử giải quyết như thế này:
=OFFSET($D$3,ROW(1:1),MATCH($A$1,$E$3:$G$3,0))

 

[TheThienChu]

ok bạn, mình đã làm đc, thanks bạn nhiều nha. Nhưng cho mình hỏi thêm, nếu mình thay số 1,2,3 bằng 1,26,51 thì khi nhập vào ô A1 =26 nó ko tìm đc giá trị??? vậy giải quyết ntn?
View attachment 157481

B4=IFERROR(INDEX($E4:$G4,MATCH($A$1,$E$3:$G$3,0)),"Nhập lại đê")