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

موضوع: دستوری برای جمع زدن

  1. #1
    mokaram آنلاین نیست.
    مدير تالار اکسل و بانک اطلاعاتی


    آخرین بازدید
    3 روز پیش
    تاریخ عضویت
    February_2011
    محل سکونت
    ســــاوه
    نوشته ها
    1,560
    امتیاز
    5597
    سپاس
    6,381
    سپاس شده
    4,393 در 1,235 پست

    mokaram به Yahoo ارسال پیام فرستادن پیام با Skype به mokaram

    دستوری برای جمع زدن

    با سلام
    یه متغیر تعریف کردم از آ ۱ تا زد ۱ و تو هر خونه یه کد نوشته شده
    و زیر هر کد چند تا عدد هست.
    چطوری میتونم دستوری بنویسم که اگه تو تکست باکس ۱ یه کدوم از متغییر ها
    را زدم بیاد اعداد زیر اون متغیر را جمع بزنه
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2.  

  3. #2


    آخرین بازدید
    24 _ 08 _ 2014
    تاریخ عضویت
    June_2011
    نوشته ها
    278
    امتیاز
    83
    سپاس
    37
    سپاس شده
    88 در 34 پست

    RE: دستوری برای جمع زدن

    درخواستتون خیلی مبهمه. ولی تصور کنم با HLOOKUP جواب میده.

  4. #3
    mokaram آنلاین نیست.
    مدير تالار اکسل و بانک اطلاعاتی


    آخرین بازدید
    3 روز پیش
    تاریخ عضویت
    February_2011
    محل سکونت
    ســــاوه
    نوشته ها
    1,560
    امتیاز
    5597
    سپاس
    6,381
    سپاس شده
    4,393 در 1,235 پست

    mokaram به Yahoo ارسال پیام فرستادن پیام با Skype به mokaram

    RE: دستوری برای جمع زدن

    نقل قول نوشته اصلی توسط Amirsayyafi
    درخواستتون خیلی مبهمه. ولی تصور کنم با HLOOKUP جواب میده.

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



  5. #4


    آخرین بازدید
    24 _ 08 _ 2014
    تاریخ عضویت
    June_2011
    نوشته ها
    278
    امتیاز
    83
    سپاس
    37
    سپاس شده
    88 در 34 پست

    RE: دستوری برای جمع زدن

    من وی بی بلد نیستم ولی فایل زیر میتونه پاسخ شما باشه.


    http://persiandrive.com/346837

  6. #5


    آخرین بازدید
    22 _ 08 _ 2012
    تاریخ عضویت
    June_2011
    نوشته ها
    33
    امتیاز
    8
    سپاس
    0
    سپاس شده
    0 در 0 پست

    RE: دستوری برای جمع زدن

    با سلام

    دوست عزیز در فایلی که براتون تسویه حساب انجام میداد من این کارو براتون انجام داده بودم ولی با این حال فایل زیر رو ببینید

    http://upin.ir/images/xe9yziqyt9iyipuzxtwa.xls

  7. #6
    mokaram آنلاین نیست.
    مدير تالار اکسل و بانک اطلاعاتی


    آخرین بازدید
    3 روز پیش
    تاریخ عضویت
    February_2011
    محل سکونت
    ســــاوه
    نوشته ها
    1,560
    امتیاز
    5597
    سپاس
    6,381
    سپاس شده
    4,393 در 1,235 پست

    mokaram به Yahoo ارسال پیام فرستادن پیام با Skype به mokaram

    RE: دستوری برای جمع زدن

    نقل قول نوشته اصلی توسط EBRAHIMSASANI
    با سلام

    دوست عزیز در فایلی که براتون تسویه حساب انجام میداد من این کارو براتون انجام داده بودم ولی با این حال فایل زیر رو ببینید

    http://upin.ir/images/xe9yziqyt9iyipuzxtwa.xls
    ممنون دوست عزیز
    میشه در باره این کد:
    کد PHP:
    txt = Array("a2:a65536""b2:b65536""c2:c65536""d2:d65536""e2:e65536""f2:f65536""g2:g65536""h2:h65536"
    و این کد :
    کد PHP:
    TextBox2.Text Application.WorksheetFunction.Sum(Sheet1.Range(txt(c.Column 1))) 
    یه توضیحی بدید که چی میگه

  8. #7


    آخرین بازدید
    22 _ 08 _ 2012
    تاریخ عضویت
    June_2011
    نوشته ها
    33
    امتیاز
    8
    سپاس
    0
    سپاس شده
    0 در 0 پست

    RE: دستوری برای جمع زدن

    با سلام
    Dim txt
    با این کد متغیر txt را تعریف نمودیم


    txt = Array("a2:a65536", "b2:b65536", "c2:c65536", "d265536", "e2:e65536", "f2:f65536", "g2:g65536", "h2:h65536")1
    در کد بالا با استفاده از آرایه یک بعدی به متغیر txt مقداردادیم
    توضیح اینکه آرایه ها جهت ذخیره مجموعه ای از داده ها بکار می روند ( دقت کنید که مجموعه ای از داده ها ) . آرایه ها متغیرهایی محسوب می شوند که به جای یک مقدار چندین مقدار را ذخیره می کنند که vba از آرایه های یک بعدی و چند بعدی پشتیبانی می کند . در این کد متغیر txt آرایه ای یک بعدی می باشد که برای ذخیره مقادیر ستونهای A تا H بکار رفته به غیر از ردیف یک این ستونها .
    یک آرایه تک بعدی یک ستون از داده های مربوطه می باشد ( و یا یک سطر ) و دارای نام و مؤلفه جهت دسترسی به مقادیر موجود در آرایه .


    می توانیم کد را به صورت زیر نیز تعریف کنیم
    Dim txt(7) As Range ( آرایه شامل 8 مؤلفه می باشد از 0 تا 7) که txt(0)1 در کد فوق معادل "a2:a65536" می باشد و txt(1) 1معادل "b2:b65536" و الخ


    For Each c In Sheet1.Range("a1:h1") 1
    شروع حلقه for/each که متغیر c را در مجموعه A1:H1 تعریف کرده ایم یعنی این حلقه در بین خانه های A1 تا H1 گردش می کند و شرطها و دستورات قرارگرفته در درون حلقه را برای این خانه ها بررسی و اجرا می کند


    If c = TextBox1.Text Then
    اگر متغیر c مقدارش با مقدار textbox1 برابر باشد مثلاً 101 باشد


    TextBox2.Text = Application.WorksheetFunction.Sum(Sheet1.Range(txt (c.Column-1)))1
    Application.WorksheetFunction.sum
    این کد مشخص می کند که می خواهیم از فرمولهای موجود در اکسل استفاده کنیم که در این جا sum می باشد
    Sheet1.Range(txt(c.Column – 1))1 معادل شیت یک ، مجموعه txt(1)1 می باشد c.columnیا شماره ستون برای متغیر c به عنوان مثال c=101 برابر 2 می باشد که اگر یک را از آن کم کنیم برابر یک می شود و در آرایه txt(1)1 معادل "b2:b65536" می باشد که مجموعه ی زیر ستون با سرستونی 101 می باشد ممکن است سؤالی پیش بیاید و آن اینکه چرا از شماره ستون یک را کم کنیم جواب این است که در تعریف آرایه کران پایین آرایه به طور پیش فرض صفر می باشد یعنی شماره ستون خانه های زیر ستون b که در کد ما شامل b2:b65536 می شوند و در آرایه به عنوان دومین مجموعه هستند دو می باشد حال ما برای اشاره به مجموعه b2:b65536 در آرایه باید شماره مؤلفه یک را انتخاب کنیم یعنیtxt(1)1

    End If
    پایان شرط

    Next c
    پایان حلقه c

    اعداد یکی که بعد پرانتزها گذاشته شده به خاطر مشکل نوشتن کد در صفحه فرومه که پرانتزها و بعضی کاراکترها را در سر جای خودش نمی ذاره و در کدهای شما نباید نوشته بشه

    امیدوارم تونسته باشم منظور رو رسونده باشم

  9. #8
    mokaram آنلاین نیست.
    مدير تالار اکسل و بانک اطلاعاتی


    آخرین بازدید
    3 روز پیش
    تاریخ عضویت
    February_2011
    محل سکونت
    ســــاوه
    نوشته ها
    1,560
    امتیاز
    5597
    سپاس
    6,381
    سپاس شده
    4,393 در 1,235 پست

    mokaram به Yahoo ارسال پیام فرستادن پیام با Skype به mokaram

    RE: دستوری برای جمع زدن

    خیلی زیبا و با بلاغت گفته
    ممنون

  10. #9


    آخرین بازدید
    6 روز پیش
    تاریخ عضویت
    September_2011
    محل سکونت
    استان فارس - فراشبند
    نوشته ها
    151
    امتیاز
    36
    سپاس
    55
    سپاس شده
    31 در 22 پست

    RE: دستوری برای جمع زدن

    با اجازه اساتيد محترم

    اين فايل را هم ببين
    http://uplod.ir/w1h92grwk4wk/total.xlsm.htm

  11. #10


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

    RE: دستوری برای جمع زدن

    نمیدونم چه اصراری بر استفاده از فرم بوده گرچه در vba هم میشه این کارو کرد با یک خط کد و ترکیب سه فرمول sum,offset, count


صفحه 1 از 2 12 آخرینآخرین

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

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

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

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

  1. دستور حلقه جهت پاک کردن سلول
    توسط khorasan66 در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 9
    آخرين نوشته: 18 _ 12 _ 2013, 20:52
  2. ساختار صحیح دستورات شرطی در vb
    توسط امیر رضا دهقان در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 1
    آخرين نوشته: 05 _ 01 _ 2013, 09:40
  3. حذف ردیف با دستور
    توسط khorasan66 در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 4
    آخرين نوشته: 03 _ 01 _ 2013, 16:39
  4. دستور پرينت
    توسط sohrabahmadi در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 2
    آخرين نوشته: 30 _ 11 _ 2012, 08:57
  5. دستوری برای فیلتر کردن
    توسط farzin24622 در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 5
    آخرين نوشته: 28 _ 12 _ 2011, 00:55

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

كد دستوری اكسل برای جمع زدن

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

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

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