[Help]Tìm Sim với Left, Right func

  • Thread starter bindaden
  • Ngày gửi

1664 lượt xem

B

bindaden

Sơ cấp
9/11/09
1
0
0
39
Hanoi
Chào các bác,

Các bác giúp em với em loay hoay mãi mà chưa giải quyết đc. Em có 1 bảng sim số (tổng hợp lẫn lộn, rất nhiều sim) em có bài toán như sau:

C1. Đưa ra 1 bảng gồm các Sim có đầu 091, đuôi 999
C2. Tìm Sim Vina có đuôi 8668
C3. ...

Nhờ các bác cho em câu lệnh ví dụ để chạy với ạ.

//Em ko dành về Filter lắm nên bác nào hướng dẫn em qua về filter luôn ở đây càng tốt ạ.

Thanks các bác.
 
A

anh phuong

Sơ cấp
15/5/07
60
2
8
Mien Tay
Code Loc của bạn đây, Loc đầu số 091 và đuôi là 4 số nào đó. Bạn xem file đính kèm và sửa lại cho phù hợp

Mã:
Sub LocDauDuoi()
    With Sheet1.Range("A1").CurrentRegion
        .AutoFilter 1, [B2] & "*******", xlAnd, "******" & [C2]
        .Offset(1, 0).SpecialCells(2).Copy
        Sheets("Sheet1").Range("E2").PasteSpecial 3
        .AutoFilter
    End With
End Sub
 

Đính kèm


Thành viên trực tuyến

  • phanthinu123

Xem nhiều