پرفروش ترين
برترين
آخرين محصولات فروشگاه
فایل الکترونیکی آموزش اکسل پیشرفته ۲۰۱۰
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
یوزرفرم پیشرفته -Advanced  User Form
داشبورد (مقدماتی) – Dashboards(Elementary)
ابزارهای اعتبار سنجی و اخطار دهنده
بسته آموزشی userform
مدیریت و کنترل خطا در اکسل
توابع متنی
گرافیک در اکسل
جزوه آموزشی جداول و نمودارهای پاشنه ای
فایل آموزشی نحوه تهیه فرمت عددی دلخواه یا custom number format cell
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
نمایش نتایج: از شماره 1 تا 9 , از مجموع 9

موضوع: فيلتر كردن با ماكرو

  1. #1


    آخرین بازدید
    18 _ 06 _ 2013
    تاریخ عضویت
    December_2010
    نوشته ها
    12
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست

    Mad فيلتر كردن با ماكرو

    با سلام
    براي فيلتر كردن ماكروي زير رو داريم

    ActiveWindow.ScrollColumn = 3
    ActiveWindow.ScrollColumn = 14
    ActiveWindow.ScrollColumn = 17
    ActiveWindow.ScrollColumn = 20
    ActiveWindow.ScrollColumn = 21
    ActiveWindow.ScrollColumn = 23
    ActiveWindow.ScrollColumn = 24
    ActiveWindow.ScrollColumn = 25
    ActiveWindow.ScrollColumn = 26
    ActiveWindow.ScrollColumn = 27
    ActiveWindow.ScrollColumn = 28
    ActiveWindow.ScrollColumn = 29
    ActiveWindow.ScrollColumn = 30
    ActiveWindow.ScrollColumn = 31
    ActiveWindow.ScrollColumn = 32
    ActiveWindow.ScrollColumn = 33
    ActiveWindow.ScrollColumn = 34
    ActiveWindow.ScrollColumn = 35
    ActiveWindow.ScrollColumn = 36
    ActiveWindow.ScrollColumn = 37
    ActiveWindow.ScrollColumn = 39
    Selection.AutoFilter Field:=3, Criteria1:="1"
    Range("AW1:AW4").Select
    Range("AW4").Activate
    Selection.AutoFilter Field:=2, Criteria1:="1"
    Selection.AutoFilter Field:=1, Criteria1:="1"
    ActiveWindow.ScrollColumn = 38
    ActiveWindow.ScrollColumn = 37
    ActiveWindow.ScrollColumn = 36
    ActiveWindow.ScrollColumn = 35
    ActiveWindow.ScrollColumn = 34
    ActiveWindow.ScrollColumn = 33
    ActiveWindow.ScrollColumn = 32
    ActiveWindow.ScrollColumn = 30
    ActiveWindow.ScrollColumn = 27
    ActiveWindow.ScrollColumn = 24
    ActiveWindow.ScrollColumn = 19
    ActiveWindow.ScrollColumn = 1
    Range("C10").Select
    End Sub
    حال ميخواستم شرح مختصر هر كدام رو بدونم و ضمنا يك فايل ضميمه و براي برداشتن فيلتر از چه ماكرويي ميشه استفاده كرد؟
    خيلي خيلي ممنون
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2.  

  3. #2


    آخرین بازدید
    19 _ 07 _ 2016
    تاریخ عضویت
    October_2010
    محل سکونت
    قائمشهر
    نوشته ها
    114
    امتیاز
    52
    سپاس
    150
    سپاس شده
    51 در 26 پست

    RE: فيلتر كردن با ماكرو

    سلام
    ماكرويي كه شما گذاشتيد فكر ميكنم با ابزار record ايجاد كرديد چون حركتهاي غلتك ماوس رو هم آورده.
    Selection.AutoFilter Field:=3, Criteria1:="1"
    شما اينجا روي ستون c عدد ۱ رو مبناي فيلتر قرار داديد
    Selection محوطه هست كه عمل فيلتر در اون انجام ميشه
    Field:=3 اين شماره ستونه
    Criteria1:="1 اينم عدد مبنا
    اميدوارم تونسته باشم منظورمو برسونم

  4. #3


    آخرین بازدید
    2 روز پیش
    تاریخ عضویت
    June_2010
    محل سکونت
    تهران
    نوشته ها
    121
    امتیاز
    12
    سپاس
    11
    سپاس شده
    1 در 1 پست

    runmohsen به Yahoo ارسال پیام

    RE: فيلتر كردن با ماكرو

    با سلام
    دوستان چطور ميتوان از طريق كد نويسي ويا ماكرو , اطلا عات داخل يك ستون مشخص رو مثلا هر 1 دقيقه به ترتيب صعودي به نزولي سورت كرد , و به صورت اتوماتيك اين عمل هر يك دقيقه انجام بشه

  5. #4


    محصولات کاربر

    داشبورد (مقدماتی)
    جداول محوری - Pivot table
    کتاب آموزش جامع و پیشرفته اکسل 2010
    آخرین بازدید
    یک هفته پیش
    تاریخ عضویت
    March_2010
    محل سکونت
    تهران
    نوشته ها
    2,053
    امتیاز
    4464
    سپاس
    2,518
    سپاس شده
    4,052 در 1,242 پست

    khakzad به Yahoo ارسال پیام

    RE: فيلتر كردن با ماكرو

    سلام
    بله
    این فایل هر 10 ثانیه رنجa1:a300 رو sort .میکنه
    http://www.4shared.com/file/PrAhwACD/Book1.html[hr]
    فقط ماکرو رو اول یک بار اجرا کنید[hr]
    اگر دقت کنیذ.کافیه اون یک خط کد رو به کد دلخواه اضافه کنید.مشاهده می کنید که زمان از ساعت تا ثانیه قابل تنظیم هست

  6. #5


    آخرین بازدید
    2 روز پیش
    تاریخ عضویت
    June_2010
    محل سکونت
    تهران
    نوشته ها
    121
    امتیاز
    12
    سپاس
    11
    سپاس شده
    1 در 1 پست

    runmohsen به Yahoo ارسال پیام

    RE: فيلتر كردن با ماكرو

    محدوده سلولها رو چطور كد ماكروشون رو تغيير بديم تا رديفها نيز با اجراي ماكرو تغيير رديف بدن
    منظور اينه كه يك محدوده رو رو ميخواهيم سورت كنيم يك ستون سورت ميشه وبر روي محدوده اطرافش تغييرات اعمال ميشه
    مثلا در فايل نمونه شما اگر در ستونهاي b و c نيز ديتا داشته باشيم اونها هم با سورت شده ستون a تغيير پيدا كنن

  7. #6


    آخرین بازدید
    08 _ 03 _ 2017
    تاریخ عضویت
    November_2010
    محل سکونت
    کرج
    نوشته ها
    363
    امتیاز
    261
    سپاس
    193
    سپاس شده
    562 در 140 پست

    MEYTI به Yahoo ارسال پیام

    RE: فيلتر كردن با ماكرو

    با سلام خدمت شما دوست عزیز
    در فایل زیر با سورت شدن ستون a ستونهای دیگری که دارای دیتا هستند تغییر مکنند.
    http://www.upload4files.tk/download.php?file=d5f9c60b096f4d41ccd5eddd21b84b7a

  8. #7


    آخرین بازدید
    26 _ 07 _ 2016
    تاریخ عضویت
    January_2011
    نوشته ها
    32
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست

    RE: فيلتر كردن با ماكرو

    دوست عزیز
    با اجازه اساتید فن بویژه شمس العلما عزیز من یک فایل نمونه پیوست کردم امیدوارم به دردتون بخوره
    در این فایل از ستون A1تا ستون E1500 تمام تغییرات اعمال خواهد شد

    http://www.4shared.com/file/IVtGzcaE/Book.html

  9. #8


    آخرین بازدید
    تاریخ عضویت
    November_2012
    نوشته ها
    17
    امتیاز
    0
    سپاس
    3
    سپاس شده
    1 در 1 پست

    RE: فيلتر كردن با ماكرو

    سلام دوستان گرامي
    من هم در همين مورد يه سوالي داشتم
    به اين ماكرو يه نگاه بندازين
    Sub Macro6()
    '
    ' Macro6 Macro
    '

    '
    ActiveSheet.Range("$A$5:$A$28").AutoFilter Field:=1, Criteria1:=Range("e5").Value


    End Sub

    همانطور كه ميبينين
    اين ماكرو در روي ستون 1 يك فايل اكسل عبارتي را كه در خانه E5 وجود دارد را فيلتر مينمايد
    در اين خصوص لازم به ذكر ميدونم كه بگم اين ماكرو دقيقا عبارت داخل e5را فيلتر ميكند
    حالا اگر بخواهيم اين ماكرو در ستون 1 عبارتهايي را كه شامل سلول E5 باشد را فيلتر كند بايد چگونه كدنويسي كرد؟؟؟ به زبان ساده تر كد نويسي با شرط CONTIAN چگونه است؟؟؟
    ممنون ميشم كمكم كنيد....

  10. #9


    آخرین بازدید
    27 _ 02 _ 2013
    تاریخ عضویت
    March_2011
    نوشته ها
    20
    امتیاز
    1
    سپاس
    0
    سپاس شده
    2 در 2 پست

    RE: فيلتر كردن با ماكرو

    نقل قول نوشته اصلی توسط khakzad
    سلام
    بله
    این فایل هر 10 ثانیه رنجa1:a300 رو sort .میکنه
    http://www.4shared.com/file/PrAhwACD/Book1.html[hr]
    فقط ماکرو رو اول یک بار اجرا کنید[hr]
    اگر دقت کنیذ.کافیه اون یک خط کد رو به کد دلخواه اضافه کنید.مشاهده می کنید که زمان از ساعت تا ثانیه قابل تنظیم هست
    سرکار خانم خاکزاد
    لینک دانلود که گذاشتین خرابه
    میشه برای من ایمیل کنین.ممنونم.
    hoomanamooh@gmail.com


اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

ماکرو فیلتر در اکسل

ماکرو فیلتر اکسل

ماکرو فیلتر کردن در اکسل

فیلتر کردن تاریخ در اکسل در ماکرو

اموزش فیلتر کردن با ماکرو

اکسل ماکرو فیلتر

فیلتر گذاری در ماکرو برای اکسل

عمل فیلتر کردن در اکسل با استفاده از vba

بررسی فیلتر در vba اکسل

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است