Hỗ trợ giúp về cách tìm các số liệu cần tìm trong 1 bảng số liệu (2 người xem)

[sawakaki]

Chào các pro, hiện em đang có các dãy số gồm nhiều các con số trong 1 file, bây giờ em muốn tìm các con số trong đó thì làm như thế nào ạ, bác nào có công thức hay cách nào đó có thể chỉ bảo giúp em được ko ạ
4654641121365564
4546345463443235
5345364646545645
4545463465464666

VD: em muốn tìm 2646245 nếu có thì sẽ xuất hiện màu có các con số ở hàng cột hoặc hàng dọc.

vì em đang thử việc ở 1 cty, bây giờ sếp có đặt ra vấn đề như trên, có tìm đc số cần tìm trong 1 bảng số liệu không
rất mong các bác giúp đỡ.
cảm ơn

 

[SA_DQ]

Bạn tham khảo trước cái này:

Option Explicit
Sub T́mCácConSó()
 Dim Rng As Range, sRng As Range
 Dim MyAdd As String
 Dim J As Long, sNum As Variant, Rws As Long
 Set Rng = [b2].CurrentRegion
 Rws = Rng.Rows.Count
 ReDim Arr(1 To Rws, 1 To 1) As Double
 sNum = InputBox("Hay Nhap Só Càn T́m:", "GPE.COM Dè Nghi:", "5456")
 If Not IsNumeric(sNum) Then
    MsgBox "Tam Biet Ban!", , "Hen Sóm Gap Lai!"
 Else
    Rng(2).Offset(, 2).Resize(Rws).Value = ""
    Set sRng = Rng.Find(CDbl(sNum), , xlFormulas, xlPart)
    If sRng Is Nothing Then
        MsgBox "Nothing", , "GPE.COM Xin Tam Biet!"
    Else
        MyAdd = sRng.Address
        Do
            J = J + 1
            Arr(J, 1) = sRng.Value
            Set sRng = Rng.FindNext(sRng)
        Loop While Not sRng Is Nothing And sRng.Address <> MyAdd
    End If
    Rng(2).Offset(, 2).Resize(J).Value = Arr()
 End If
End Sub

 

[be_09]

Chào các pro, hiện em đang có các dãy số gồm nhiều các con số trong 1 file, bây giờ em muốn tìm các con số trong đó thì làm như thế nào ạ, bác nào có công thức hay cách nào đó có thể chỉ bảo giúp em được ko ạ
4654641121365564
4546345463443235
5345364646545645
4545463465464666

VD: em muốn tìm 2646245 nếu có thì sẽ xuất hiện màu có các con số ở hàng cột hoặc hàng dọc.

vì em đang thử việc ở 1 cty, bây giờ sếp có đặt ra vấn đề như trên, có tìm đc số cần tìm trong 1 bảng số liệu không
rất mong các bác giúp đỡ.
cảm ơn

Tùy theo đơn vị và tùy nhu cầu mà người ta tuyển dụng người cho phù hợp với công việc đó.

Do đó: Khi thử việc thì người ta kiểm tra những cái từ cơ bản đến nâng cao, nhưng cái đơn giản nhất là sử dụng công cụ tìm kiếm có sẳn trong Excel mà bạn không làm được thì nguy to.

Sử dụng công cụ tìm kiếm có sẳn thì làm vầy:

- Mở Excel.
- Chọn cột cần tìm.
- Nhấn Ctrl+F, hoặc Ctrl+H, cửa sổ Find and Replace hiện ra.
- Chọn thẻ Find, trong khung Find What gõ nội dung cần tìm rồi nhấn Find Next.

Người ta mới thử việc, chưa biết gì ráo.
Mà bác HYen17 chơi đao to quá (người ta vác không nổi).

 

[SA_DQ]

Không đại đao thì làm sao tô màu các chữ số tìm thấy đây ông bạn!

 

[sealand]

Em cảm thấy hình như 2 bác nhầm mất rồi
Chủ Topic viết "em muốn tìm 2646245 nếu có thì sẽ xuất hiện màu có các con số ở hàng cột hoặc hàng dọc....." vậy thì phải dùng Condition Format mới ổn chứ, nhưng nếu chỉ tô màu cụm số này thì có lẽ VBA mơilàm được.

 

[be_09]

Em cảm thấy hình như 2 bác nhầm mất rồi
Chủ Topic viết "em muốn tìm 2646245 nếu có thì sẽ xuất hiện màu có các con số ở hàng cột hoặc hàng dọc....." vậy thì phải dùng Condition Format mới ổn chứ, nhưng nếu chỉ tô màu cụm số này thì có lẽ VBA mơilàm được.

Chủ Topic không nói rỏ cột thì chơi vầy:

1/ Chọn hết vùng chứa dữ liệu rồi dùng cách ở bài #3, nếu tìm đúng dữ liệu thì nó tô sáng lên.

2/ Nếu VBA thì chơi vầy:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)Dim Row_Chon As Integer, Column_Chon As Integer, R As Integer, C As Integer

Cells.Interior.ColorIndex = 0
Row_Chon = ActiveCell.Row
Column_Chon = ActiveCell.Column

For R = 1 To Row_Chon    
        Cells(R, Column_Chon).Interior.ColorIndex = 8
Next R

For C = 1 To Column_Chon    
        Cells(Row_Chon, C).Interior.ColorIndex = 8
Next C
End Sub

Chọn Cell đầu tiên của cột muốn tìm, cách tìm thì như bài #3.