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

موضوع: property ، method ، event و سایر کدها در اکسل

  1. #1


    آخرین بازدید
    15 ساعت پیش
    تاریخ عضویت
    January_2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,196
    امتیاز
    2504
    سپاس
    1,399
    سپاس شده
    1,960 در 627 پست

    jansiz hayat به Yahoo ارسال پیام

    property ، method ، event و سایر کدها در اکسل

    با سلام به همه.

    از همه ی دوستان VB درخواست دارم تا هر چه در مورد property ، method و event ها در اکسل بلدن با توضیحات کامل و در صورت امکان با یک ضمیمه به اشتراک بذارن .می خوام یک تایپیک مرجع در مورد property ، method و event ها ایجاد بشه تا همه استفاده کنن.مهم نیست که موضوع پیچیده است یا ساده ،فقط هر کی هرچی میدونه به اشتراک بذاره(در ضمن ،سعی شود از موضوعات تکراری جلوگیری شود واگر یکی اشتباهی مورد تکراری قرار داد ،اون رو حذف کنه).اینجوری دوستان مبتدی هم میتونن به پیشرفت یادگیریشون سرعت بدن....................از ساده ها شروع میکنیم تا پیشرفته ها.................
    ویرایش توسط ~M*E*H*D*I~ : 12 _ 05 _ 2014 در ساعت 14:19

  2. سپاس ها (2)


  3.  

  4. #2


    آخرین بازدید
    15 ساعت پیش
    تاریخ عضویت
    January_2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,196
    امتیاز
    2504
    سپاس
    1,399
    سپاس شده
    1,960 در 627 پست

    jansiz hayat به Yahoo ارسال پیام

    RE: property ، method و event ها در اکسل

    سلام آقای وطن پرست.میشه توضیحی در مورد کدتون بدین(اونی که زیرش خط کشیدم)...میخوام اینجارو پر بارش کنم.
    myList = myList & i & " - " & ActiveWorkbook.Sheets(i).Name & " " & vbCr

  5. #3


    آخرین بازدید
    3 هفته پیش
    تاریخ عضویت
    October_2011
    محل سکونت
    Sheet1!A1
    نوشته ها
    4,149
    امتیاز
    11600
    سپاس
    4,478
    سپاس شده
    10,982 در 2,948 پست

    RE: property ، method و event ها در اکسل

    من خواستم به صورت ستونی تو input box اضافه بشه mylist دوم باعث شده شیت ها پشت سر هم بچسبن به هم یعنی
    sheet1-sheet2.... بعد به input box اضافه کردم این ساده بود که

  6. #4


    آخرین بازدید
    15 ساعت پیش
    تاریخ عضویت
    January_2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,196
    امتیاز
    2504
    سپاس
    1,399
    سپاس شده
    1,960 در 627 پست

    jansiz hayat به Yahoo ارسال پیام

    RE: property ، method و event ها در اکسل

    اقای وطن پرست اینارو میدونم.گفتم که;می خوام تایپیک رو جامع کنم تا همه استفاده کنن.لطفاً اگه ممکنه توضیحاتتون رو کامل کنید.انگار دارید برای یک تازه کار توضیح میدین.(مثل اینکه تا از دوستان سئوال نشه،نمی خوان اطلاعاتشون رو در اختیار دیگران قرار بدن.خودم هم سعی می کنم هر روز حداقل یک مورد رو توضیح بدم.البته در حد سواد خودم.)
    با نشکر

  7. #5


    آخرین بازدید
    3 هفته پیش
    تاریخ عضویت
    October_2011
    محل سکونت
    Sheet1!A1
    نوشته ها
    4,149
    امتیاز
    11600
    سپاس
    4,478
    سپاس شده
    10,982 در 2,948 پست

    RE: property ، method و event ها در اکسل

    با سلام
    در ادامه توضیح طبق خواسته آقا جاوید این مطالبم اضافه میکنم راستش تو توضیح قبل من فقط به mylist توجه کردم.
    در زبان VBA ثابت هایی وجود دارند که اصطلاحا بهش میگن Miscellaneous Constants که به شرح زیر هستند

    نوع ثابت
    کد PHP:
    vbCrLf
    vbCr
    vbLf
    vbNewLine
    vbNullChar
    vbNullString
    vbObjectError
    vbTab
    vbBack
    vbFormFeed
    vbVerticalTab 
    این ثابت ها با اضافه شدن به کد اعمالی از قبیل رفتن به سر سطر، ایجاد تب خالی ، ایجاد line جدید انجام می دن ، به عنوان مثال تو کدی که آقا جاوید پرسیدن Vbcr باعث میشه به سر سطر بریم یعنی لیست شیت ها زیر هم قرار بگیرند در ادامه هم برای ایجاد فاصله بین Select sheet to go to و لیست شیت ها 2بار از این ثابت استفاده شده که اگه حذف بشه این فاصله از بین میره در واقع حذف این ثابت ها در ساختار برنامه خللی ایجاد نمیکنه و استفاده از اونها جهت تنظیمهای ظاهر برنامه کاربرد داره برای درک بهتر پیشنهاد می کنم عملا از این ثابت ها استفاده بشه تا تغییرات حاصل رو ببینید
    ویرایش توسط ~M*E*H*D*I~ : 12 _ 05 _ 2014 در ساعت 14:23

  8. #6


    آخرین بازدید
    15 ساعت پیش
    تاریخ عضویت
    January_2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,196
    امتیاز
    2504
    سپاس
    1,399
    سپاس شده
    1,960 در 627 پست

    jansiz hayat به Yahoo ارسال پیام

    RE: property ، method و event ها در اکسل

    Do...untilحلقه هست ولی select case یک شرط چندگانه است.

    [size=medium]حلقه Do While ... Loop :[/size]
    این حلقه نسبت به حلقه های دیگر بسیار ساده می باشد.در این حلقه،ابتدا شرط را بررسی می کند و اگر شرط درست باشد حلقه را ادامه می دهد در غیر اینصورت حلقه متوقف می شود و به شکل زیر می باشد:

    DO WHILE condition
    کدی که باید اجرا شود
    LOOP

    مثال:
    Dim x as integer
    Do while x<5
    msgbox x
    Loop
    توضیح:
    در خط اول متغیری(x)از نوع عددی تعریف کردیم.
    در خط دوم شرط می گذاریم که تا زمانی که x<5 باشد،حلقه را اجرا کند.
    در خط سوم مقدار کنونی x از طریق یک کادر پیغام نشان داده می شود
    و خط سوم اشاره به ابتدای حلقه دارد.
    یعنی اولین بار که حلقه اجرا می شود،x=1می شود.بررسی می کند که آیا xکوچکتر از 5 است یا نه.اگر شرط درست باشد وارد حلقه می شود و در انتهای حلقه یک واحد به x اضافه میشود.یعنی x=2می شود.دوباره شرط را چک می کند که آیا x<5است یا نه.چون2 کوچکتر از 5 است،پس وارد حلقه می شود و دستورات داخل حلقه را اجرا می کند(یعنی مقدار x از طریق کادر پیغام اعلام می شود).
    __________________________________________________ __________________________________________________ ____________________
    [size=medium]حلقه Do...until :[/size]
    تا زمانی که شرط به یک مقدار مورد نظر نرسد،حلقه ادامه دارد ولی اگر حلقه به مقدار مورد نظر برسد،حلقه متوقف می شود.
    مثال:
    c=0............................................... ...مقدار دهی اولیه به متغیر c (نوشتن این قسمت اختیاری است).
    Do until c =10..........اینجا می گوئیم که: "تا زمانی که cبرابر ده نشده است،حلقه را اجرا کن
    c=c+1..................یک واحد به مقدار cاضافه می شود
    loop.....................اشاره به ابتدای حلقه دارد
    تا زمانی که cبه عدد ده نرسیده است حلقه تکرار می شود.

    __________________________________________________ __________________________________________________ __________________
    [size=medium]Select Case:[/size]
    از این دستور برای انجام عملیات زیاد بر رو یک متغیر استفاده می شود
    مثال:
    Select Case Cells(1, 1)..........سلول(1,1)را در نظر بگیر یا انتخاب کن
    Case 1...............................اگر مقدار شیئ انتخابی (A1) برابر 1 باشد
    MsgBox 1...........................پیغام مبنی بر اینکه مقدار برابر 1 است ، صادر کن
    Case 2...............................اگر مقدار شیئ انتخابی (A1) برابر 2 باشد
    MsgBox 2...........................پیغامی مبنی بر اینکه مقدار برابر 2است ، صادر کن
    End Select
    یا می توان به صورت زیر نیز نوشت:
    Select Case Sheet1.Range("a1")
    Case Is = 1
    MsgBox Sheet1.Range("a1")
    Case Is = 2
    MsgBox Sheet1.Range("a1")
    Case Is = 3
    MsgBox Sheet1.Range("a1")
    End Select

    __________________________________________________ __________________________________________________ __________________
    [size=medium]حلقه FOR...NEXT :[/size]
    این حلقه بیشتر برای شمارش مورد استفاده قرار می گیرد و صورت کلی آن را می توان به شکل زیر در نظر گرفت:

    FOR Dim=start TO end
    دستوراتی که باید اجرا شود
    NEXT

    در بالا:
    Dim:نام متغیر اختیاری ما می باشد.
    start:نقطه ی شروع حلقه می باشد(منفی هم می تواند باشد).
    end:نقطه پایانی حلقه می باشد(منفی هم می تواند باشد).
    NEXT:اشاره به ابتدای حلقه دارد.
    هر بار که حلقه تکرار می شود،مقداری به مقدار (i) اضافه می شود.

    مثال:

    for i =1 to 10
    msgbox i
    next i

    در مثال بالا...
    ابتدا(i)مقدار 1 را در خود ذخیره می کند و وارد حلقه می شود.
    پیغامی صادر می شود که مقدار (i)را نشان می دهد.
    عبارت NEXT باعث می شود که حلقه از نو اجرا شود ،با این تفاوت که یک واحد به مقدار (i)اضافه شده و دوباره وارد حلقه می شود.پس (i) ابتدا مقدار 1 سپس 2 سپس 3 سپس 4 و ... را به خود می گیرد.این عمل تا عدد 10 انجام می گیرد.در واقع ما 10 بار پیغام (i) را دریافت می کنیم.

    افزایش انعطاف حلقه با Step:
    در مثال بالا که گفته شد یک مشکل وجود دارد و آن هم گامهای حلقه می باشد.پیش فرض گام های(step) حلقه برای پیمایش ،1 واحد است.یعنی هر بار که حلقه تکرار می شود فقط 1 واحد به مقدار قبلی متغیر اضافه می شود.حال قصد داریم با دستور Step این مشکل رو حل کنیم.

    FOR Dim=start TO end STEP step_value
    دستوراتی که باید اجرا شود
    NEXT

    در بالا step_value ،نشان دهنده ی گام های حلقه می باشد.به مثال زیر توجه کنید:


    for i =2 to 8 step 2
    msgbox i
    next i

    ابتدا (i) مقدار 2 را به خود می گیرد و وارد حلقه می شود.دستورات را اجرا می کند و وقتی به Next می رسد 2 واحد به مقدار قبلی (i) اضافه می کند.یعنی i=4 می شود و دوباره وارد حلقه میشود.در واقع ما 4 بار پیغام دریافت خواهیم کرد.چون در 8 ،4 تا 2 داریم.مقدار i به صورت روبرو می شود 8 <--6 <--4 <--2

    یک مثال کاربردی:

    فرض کنید می خواهیم از طریق حلقه FOR...NEXT عددهای بزرگتر از 5 را از طریق کادر پیغام نشان دهیم:

    For i = 1 To 10
    If i > 5 Then
    MsgBox i
    End If
    Next i
    __________________________________________________ __________________________________________________ ________________
    [size=medium]حلقه For...Each:[/size]
    صورت کلی آن را می توان چنین در نظر گرفت:
    FOR EACH dim IN location
    دستوراتی که باید اجرا شود
    NEXt

    dim:نام متغیر ماست که به دلخواه می توان هر نامی را برای آن انتخاب کرد(که قبل از حلقه باید نوع متغیرتان را مشخص کنید)
    location:محدوده یا محل متغیر را در خود ذخیره می کند(محدوده ای که متغیر در آن قرار دارد)

    این حلقه شباهت زیادی به حلقه For...Next دارد.اما حلقه For..Each یک خاصیت شیئ گرائی دارد و هدف خود را بیشتر در مجموعه ای از آرایه ها دنبال می کند.جست و جوی این حلقه بصورت تک به تک است و تمام اعضای موجود در خود را دنبال می کند.برای مثال وقتی می نویسیم:for each c in range("A1:A10")v
    c:نام متغیر ماست(از نوع محدوده)که در محدوده ی A1:A10 وجود دارد.
    یا به طور عامیانه کد بالا می گوید:«برای هر c که در محدوده ی A1:A10 وجود دارد»

    به مثال زیر توجه کنید:

    Dim c As Range
    For Each c In Range("a1:a10")
    c = 1
    Next

    در خط اول ابتدا متغیری به نام c و از نوع Range تعریف کردیم
    در خط دوم تعیین کردیم که متغیر c در محدوده یA1:A10 قرار دارد
    در خط سوم به c مقدار 1 نسبت دادیم
    خط چهارم Next اشاره به ابتدای حلقه دارد.
    طریقه عملکرد حلقه:
    اولین بار که حلقه اجرا می شود متغیر c سلول A1 را به خود نسبت می دهد بعد وارد حلقه می شود و مقدار 1 را به c(که همان A1 است)می دهد
    وقتی به Next رسید،میره به ابتدای حلقه و میره سراغ محدوده ی بعدی،یعنی A2.پس c سلول A2 را به خود نسبت می دهد.و باز مقدار 1 را به c اختصاص می دهد و وقتی به Next رسید دوباره میره ابتدای حلقه و میره سراغ محدوده ی بعدی،یعنی A3.دوباره عملیات بالا را تکرار می کند.این کار آنقدر ادامه پیدا میکند تا به انتهای محدوده یعنی A10 برسد.در واقع ما به سلول های A1:A10 مقدار 1 را دادیم.

    مثال:
    فرض کنید محدوده ای را داریم و از طریق حلقه ی For...Each می خواهیم آدرس محدوده مورد نظر را سلول به سلول از طریق یک کادر پیغام(Msgbox)نشان دهیم.

    Dim c As Range
    For Each c In Range("a1:a5")
    MsgBox c.Address
    Next



  9. #7


    آخرین بازدید
    08 _ 09 _ 2015
    تاریخ عضویت
    November_2010
    نوشته ها
    123
    امتیاز
    19
    سپاس
    20
    سپاس شده
    21 در 18 پست

    RE: property ، method و event ها در اکسل

    سلام خدمت اساتيد محترم
    نوشته ها تون بسيار زيبا ست ولي بنظر من اگه اين موارد همراه با تمرين عملي نباشه زياد خاطرمون نخواهد موند بنابراين پيشنهاد ميكنم براي هر يك از موارد تمرين بسيار ساده اي هم قرار بديد تا بتونيم خودمونو آزمايش كنيم .

  10. #8


    آخرین بازدید
    15 ساعت پیش
    تاریخ عضویت
    January_2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,196
    امتیاز
    2504
    سپاس
    1,399
    سپاس شده
    1,960 در 627 پست

    jansiz hayat به Yahoo ارسال پیام

    RE: property ، method و event ها در اکسل

    با سلام .
    اگه نیاز به مثال های دیگری هم بود بگین.البته سعی می شود در پایان هر موضوع یک مثال کلی و کاربردی نیز ارائه شود.

    http://persiandrive.com/67479

  11. #9


    آخرین بازدید
    20 _ 10 _ 2015
    تاریخ عضویت
    December_2011
    نوشته ها
    275
    امتیاز
    239
    سپاس
    216
    سپاس شده
    219 در 73 پست

    RE: property ، method و event ها در اکسل

    سلام به دوستای گلم
    ممنون از آقای مختاری که پیش قدم شدن برای آموزش سیستماتیک ، فک میکنم موضوعات یه کمی پراکندس اگه جهت داشته باشه خیلی عالی میشه

  12. #10


    آخرین بازدید
    15 ساعت پیش
    تاریخ عضویت
    January_2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,196
    امتیاز
    2504
    سپاس
    1,399
    سپاس شده
    1,960 در 627 پست

    jansiz hayat به Yahoo ارسال پیام

    RE: property ، method و event ها در اکسل

    نقل قول نوشته اصلی توسط mahasa shayesteh
    سلام به دوستای گلم
    ممنون از آقای مختاری که پیش قدم شدن برای آموزش سیستماتیک ، فک میکنم موضوعات یه کمی پراکندس اگه جهت داشته باشه خیلی عالی میشه
    با تشکر از خانم شایسته.در جهت بهبود و آرایش مطالب،دوستان اگر نظری دارن حتماً بگن...


صفحه 1 از 4 123 ... آخرینآخرین

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

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

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

موضوعات مشابه

  1. سوالی در مورد event ها
    توسط mahsa shayesteh در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 0
    آخرين نوشته: 06 _ 07 _ 2012, 12:46

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

کدها در اکسل

رویدادها در اکسل

رویدادهای اکسل

event در اکسل

استفاده از inputbox دراکسل

چگونه فرمول را بین دو ورک بوک اکسل بنویسیم؟؟

شی گرائی در اکسل

نحوه استفاده از(msgbox (vbokcancel در اکسل

اکسل vba شرح رویدادها

ستفاده از پروپرتی Cells در اشاره به سلول های اکسل

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

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