فیلتر کردن براساس پیش شماره موبایل

[nariman133]

باسلام
من بانکی از شماره موبایل دارم و می خوام از بین این بانک شماره هایی که با پیش شماره 0912111 و یا 112 هستند را جدا کنم.
دوستانی که اطلاع دارند لطفا راهنمایی بفرمایند.

[misammisam]

با سلام
از فرمول زير استفاده كن ، فرضا شماره تلفن شما در سلول b3 قرار دارد

=IF(OR(LEFT(B3;7)="0912111";LEFT(B3;3)="112");B3;"") 

[nariman133]

من نمی دونم که داخل کدوم سلولها پیش شماره 111 وجو داره. یه بانک شمارست که کلی شماره با پیش شماره های مختلف وجود دارند من می خوام از بین این شماره ها، شماره هایی که با پیش شماره 111 هستند رو فیلتر کنم.
دوستان لطفا راهنمایی کنند

[misammisam]

من نمی دونم که داخل کدوم سلولها پیش شماره 111 وجو داره. یه بانک شمارست که کلی شماره با پیش شماره های مختلف وجود دارند من می خوام از بین این شماره ها، شماره هایی که با پیش شماره 111 هستند رو فیلتر کنم.
دوستان لطفا راهنمایی کنند

لازم نيست كه بدوني تو كدوم ستون ، كدوم شماره هست ، اين فرمولو تو ستون مقابلش كپي كن بعد تا آخر ليستت كپي كن !!
شما بهتره فايلتو بزاري تا ما ساختار فايلتو ببينيم ، براي اين سوال همين جوابشه .

[nariman133]

فايل به پيوست مي باشد.
در اين فايل من مي خوام پيش شماره موبايل ها رو جدا كنم . مثلا پيش شماره هايي كه 319 هستند را جدا كنم.

[misammisam]

فايل به پيوست مي باشد.
در اين فايل من مي خوام پيش شماره موبايل ها رو جدا كنم . مثلا پيش شماره هايي كه 319 هستند را جدا كنم.

براي اين كار ، راحتترين كار اينه كه از Data/Filter/Advenced استفاده كني .
تو فايل ضميمه براتون با همين ابزار دزستش كردم ، منتها يه ماكرو سيو كردم و گذاشتم توي يه دكمه كه راحت باشه ، خودتون دقت كنيد نحوه كار دستتون مياد .
تو قسمت محدوده كه مشخص كردم ( قسمت وسط )شماره هاي مورد نظرو مشخص كن و بعد دكمرو بزن ، دقت كن كه علامت كوچكتر و بزرگتر <> رو صحيح وارد كنيد

[mohammad_ashooryan]

با سلام بپيوست پاسخ ارسال شد.

[misammisam]

با سلام بپيوست پاسخ ارسال شد.

ايني كه شما كه گذاشتيد فقط براي پيش شماره هاي 319 هست ، اين دوستمون ميخواد پيش شماره دلخواه رو پيدا كنه ، در ضمن استفاده از فرمول آرايه اي براي اين همه داده منطقي نيست ، باعث ميشه فايل بيش از حد سنگين بشه .

[nariman133]

باتشكر از مدير انجمن
اين فايلي را كه ارسال نموديد يك مشكلي داره كه فقط يك تعداد خاصي از شماره ها رو فيلتر مي كند . براي نمونه من فايلي را كه حاوي 16 شماره با پيش شماره 319 هست را گذاشتم ولي فقط 10 شماره رو فيلتر مي كند.

[mohammad_ashooryan]

با سلام اميدوارم با اين فايل به جواب مد نظرتون برسيد.
mobail.xlsm

[misammisam]

باتشكر از مدير انجمن
اين فايلي را كه ارسال نموديد يك مشكلي داره كه فقط يك تعداد خاصي از شماره ها رو فيلتر مي كند . براي نمونه من فايلي را كه حاوي 16 شماره با پيش شماره 319 هست را گذاشتم ولي فقط 10 شماره رو فيلتر مي كند.

اشكال تو فرمت سلهاست ، بايد در حالت general باشه حتما ، فايل اصلاح شده خدمت شما .

[nariman133]

باتشكر از شما
به چه صورت مي تونم تعداد رنج رو بيشتر كنم. الان روي صدهزارتا تنظيم شده. وقتي بيشترش مي كنم رديف ها بهم مي ريزند

[misammisam]

باتشكر از شما
به چه صورت مي تونم تعداد رنج رو بيشتر كنم. الان روي صدهزارتا تنظيم شده. وقتي بيشترش مي كنم رديف ها بهم مي ريزند

اگه بصوزت دستي از Data/Filter/Advenced استفاده كني كه قسمت رنج رو داره و ميتوني عوضش كني ، ولي اگه ميخواي ماكرو رو عوض كني كاملا معلومه ، در پايين اون قسمتهايي كه قرمز هستن محدوده ها هستن و قابل تغييرن.

Private Sub CommandButton1_Click()
    Columns("G:G").ClearContents
    Range("A2:A100000").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
        "D3:E4"), CopyToRange:=Range("G2"), Unique:=False
    ActiveWindow.SmallScroll Down:=-18
End Sub 

[nariman133]

آقا با عرض معذرت ما تازه كاريم ، به صورت دستي كه رنج رو از قسمت Data/Filter/Advenced تغيير مي دم كلا رديف ها به هم مي ريزند. در قسمت ماكرو هم نمي توانم اديت كنم. لطفا راهنمايي بفرماييد.
با تشكر

[misammisam]

آقا با عرض معذرت ما تازه كاريم ، به صورت دستي كه رنج رو از قسمت Data/Filter/Advenced تغيير مي دم كلا رديف ها به هم مي ريزند. در قسمت ماكرو هم نمي توانم اديت كنم. لطفا راهنمايي بفرماييد.
با تشكر

منظورتو از اينكه نميتونم از طريق ماكرو عوضش كنمو نميفهمم ، قسمت Range("A2:A100000") رو عوض كن به جاي 100000 مثلا هر عدي كه محدودته يا بيشتر از محدودته بزن .
بصورت دستي هم اون بالا 2 تا گزينه هست حتما رو گزينه دوم قرارش بده يعني copy to another location
شما احتمالا ميزاري رو گزينه اول كه فيلتر در خود داده ها انجام ميشه و در قسمت سمت راست كپي نميشه .