صفحه 1 از 2 12 آخرینآخرین
نمایش نتایج: از شماره 1 تا 10 , از مجموع 12

موضوع: اجرای کدهای VBA با کلیک بر روی تب شیت

  1. #1


    آخرین بازدید
    2010/10/22
    تاریخ عضویت
    September 2010
    نوشته ها
    14
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    اجرای کدهای VBA با کلیک بر روی تب شیت

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

  2.  

  3. #2


    آخرین بازدید
    2 هفته پیش
    تاریخ عضویت
    February 2010
    محل سکونت
    مشهد
    نوشته ها
    435
    امتیاز
    950
    سپاس
    294
    سپاس شده
    881 در 210 پست
    سطح اکسل
    81.00 %

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

    RE: اجرای کدهای VBA با کلیک بر روی تب شیت

    براي اين كار بايد در محيط vb بر روي sheet مورد نظر كليك راست كرده سپس در قسمت event حادثه گزينه activate را انتخاب مبكنبم و كد مورد نظر را در قسمت مورد نظر تايپ ميكنيم . از اين به بعد هر گار وارد اين صفحه ميخواهيم بشويم اين كد انجام ميپذيرد

  4. #3


    آخرین بازدید
    2010/10/22
    تاریخ عضویت
    September 2010
    نوشته ها
    14
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: اجرای کدهای VBA با کلیک بر روی تب شیت

    نقل قول نوشته اصلی توسط mrexcel
    براي اين كار بايد در محيط vb بر روي sheet مورد نظر كليك راست كرده سپس در قسمت event حادثه گزينه activate را انتخاب مبكنبم و كد مورد نظر را در قسمت مورد نظر تايپ ميكنيم . از اين به بعد هر گار وارد اين صفحه ميخواهيم بشويم اين كد انجام ميپذيرد
    ممنون
    یه سوال دیگه هم دارم .
    آیا با DotNet نمیشه تو آفیس کار کرد ؟ مثلا نمیشه با C# توسعه داد و فایل macroEnabled ایجاد کرد ؟
    منظورم اینه که محیط توسعه به جای VBA ، دات نت باشه .

  5. #4


    آخرین بازدید
    2010/10/22
    تاریخ عضویت
    September 2010
    نوشته ها
    14
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: اجرای کدهای VBA با کلیک بر روی تب شیت

    ببخشید کسی نیست راهنمایی کنه؟
    علاوه بر سوال فوق میخواستم بدونم دستور pastespecial در VBA چی هست بطوری که مقادیر محاسبه شده(value) رو از شیت 1 در در شیت 2 کپی کنه ؟

  6. #5


    آخرین بازدید
    2 هفته پیش
    تاریخ عضویت
    February 2010
    محل سکونت
    مشهد
    نوشته ها
    435
    امتیاز
    950
    سپاس
    294
    سپاس شده
    881 در 210 پست
    سطح اکسل
    81.00 %

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

    RE: اجرای کدهای VBA با کلیک بر روی تب شیت

    ضمن تشكر از شما دوست عزيز خواهش ميكنم سئوالات را دل همديگر ننويسيد براي اين كه بهتر بتوان ان را پاسخ داد و جستجو نمود
    براي پاسخ به اين سئوال هر دو استاد مسئول تالار تخصص دارند كه اميدوارم راهنمائي بفرمايند

  7. #6


    آخرین بازدید
    2010/10/22
    تاریخ عضویت
    September 2010
    نوشته ها
    14
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: اجرای کدهای VBA با کلیک بر روی تب شیت

    منتظرم
    کسی هست اون دو تا پست قبلیم رو جواب بده ؟

  8. #7


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

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

    RE: اجرای کدهای VBA با کلیک بر روی تب شیت

    با درود فراوان
    برای اینکه سل یا سلهایی رو کپی کنی و در همان شیت یا شیت دیگری پیست اسپیشال ولیو کنی می شه از کد زیر استفاده کنید
    در این کد همان طور که میدانید Selection.Copy برای کپی کردن سلهایی که انتخاب کرده ایم و Range("F9").Select برای انتخاب مقصد که می خواهیم کپی کنیم که می تواند در شیت دیگری هم باشد که کافی است Sheet2.select قبل از آن بنویسید تا ابتدا شیت دو را انتخاب کند
    و کد آخر هم همانطور که پیداست برای کپی کردن PasteSpecial Paste که برابر با Value است

    روش اول
    Selection.Copy
    Range("F9").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    در روشی دیگر می توانید بدون اینکه از کپی پیست استفاده کنید آن را انجام دهید و برای این کار سلول مقصد را برابر با سلولی که می خواهد انتقال داده شود قرار میدهیم
    مثلا اگر می خواهیم سلول A1 را از شیت 1 کپی کنیم و در سل B1 شیت دو پیست کنیم به طریق زیر می نویسیم که در این حالت بطور پیش فرض مقدار ولیو انتقال پیدا می کند

    Sheet2.Range("b1") = Sheet1.Range("a1")

    در مورد اینکه دات نت را در آفیس استفاده کنیم نمیشود ولی برعکس آن شدنی است یعنی اکسل را در دات نت استفاده کنید و در همانجا ارتباط بین آنها را به صورتی که میخواهیم برقرار کنیم

  9. #8


    آخرین بازدید
    2010/10/22
    تاریخ عضویت
    September 2010
    نوشته ها
    14
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: اجرای کدهای VBA با کلیک بر روی تب شیت

    ممنون درست شد.
    حالا میخوام با کلیک بر روی شیت (Event اکتیو شدن شیت) یک ماکروی دیگر همزمان با فعال شدن شیت اجرا شود.
    کد اجرا شدن ماکرو در VBA به چه صورت هست ؟

  10. #9


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

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

    RE: اجرای کدهای VBA با کلیک بر روی تب شیت

    با درود فراوان

    برای اجرای ماکروی مورد نظر به وسیله کد و یا یک ماکروی دیگر از کدی زیر استفاده می شود

    Application.Run "Macro3"

    که اگر ماکرو در فایل دیگری باشد باید به اول اسم ماکرو نام فایل نیز بنویسیم

    Application.Run "book1.xls!Macro3"

    و اگر فایل باز نباشد آدرس نیز به آن اضافه می کنیم تا دچا اشکال نشود

  11. #10


    آخرین بازدید
    2010/10/22
    تاریخ عضویت
    September 2010
    نوشته ها
    14
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: اجرای کدهای VBA با کلیک بر روی تب شیت

    ممنون مشکل قبلی هم با مساعدت شما حل شد ولی یک مشکل دیگه اضافه شد !
    چون اون ماکرویی که میخوام با کلیک کردن روی شیت اجرا بشه داره از شیت دیگری کپی میکنه به همین خاطر با کلیک بر روی شیت وقتی اون Event اجرا میشه روی دور باطل! میفته و دائما بین دوشیت سوئیچ میکنه و در نتیجه آخر سر ارور میده .
    این کدی هست که در شیت PrmMembers نوشته شده :
    کد:
    Sub CopyandSort()
    
    
    Sheets("PrmMembers").Select
    Range("BN4:BP273").Select
     Selection.Copy
    Sheets("Result").Select
    Range("B2:D271").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
            :=False, Transpose:=False
    
    
    End Sub
    اینم کدی هست که در Event شیت Result نوشتم تا با کلیک کردن بر روی آن ، کدهای ماکروی فوق اجرا بشه ولی با کلیک بر شیت result چون ماکروی فوق اجرا میشه ، توی دور نامتناهی میفته.
    چکار کنم ؟
    کد:
    Private Sub Worksheet_Activate()
    Application.Run "CopyandSort"
    End Sub


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

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

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

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

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

  1. نحوه جستجو با استفاده از تابع وی لوکاپ روی دو مقدار
    توسط shaneh در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 16
    آخرين نوشته: 2016/02/04, 11:19
  2. انتقال اطلاعات از یک شیت به شیتهای دیگر با کلیک روی سلول
    توسط quietism_mum در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 3
    آخرين نوشته: 2014/06/10, 23:08
  3. پاسخ ها: 14
    آخرين نوشته: 2013/06/13, 17:06
  4. جستجوی یک پارامتر در چند شیت
    توسط farhad66 در انجمن رشته آمار و اكسل
    پاسخ ها: 1
    آخرين نوشته: 2013/05/09, 11:01
  5. ایجاد شیت جدید با استفاده از جستجوی شرطی
    توسط mohsen amin در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 2
    آخرين نوشته: 2012/07/15, 03:01

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

کدهای vba

دستور کپی با vba

کد vba در اکسل

جستجو در vba اکسل

کدهای اماده vba

خواندن اطلاعات شیت در ماکرو با استفاده از فرم

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

اجرای اسکریپت روی اکسل

کد های آماده اکسل

کدهای vbaاکسل

کد vba کپی در اکسل ۲۰۱۰

اجرا کدها در اکسل

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

کد vba که شیت را فعال میکند

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

دستور کپی vba

کدهای ماکرو که در شیط دیگر اجرا شود

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

VISUAL BASIC FOR APPLICATION مشکل در اجرای ماکرو در اکسل

كدهاي vba در اكسل

کد جستجو vba در اکسل

کد سرچ در vba اکسل

کدهی اکسل

دستور excute درvba

علاقه مندی ها (Bookmarks)

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

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