نمایش نتایج: از شماره 1 تا 4 , از مجموع 4

موضوع: ایجاد ماکرو جهت اعمال تغییرات تکرای بر روی قالب جدول

  1. #1


    آخرین بازدید
    2019/08/24
    تاریخ عضویت
    October 2014
    محل سکونت
    بوشهر
    نوشته ها
    26
    امتیاز
    24
    سپاس
    20
    سپاس شده
    14 در 10 پست
    تعیین سطح نشده است

    ایجاد ماکرو جهت اعمال تغییرات تکراری بر روی قالب جدول

    سلام دوستان
    توی یک شیت بیش از 2000 جدول دارم که می خوام با ایجاد یک ماکرو استایل تمام جداول را بصورت یکسال تغییر دهم.
    آیا با استفاده از ماکرو می توان این کار رو انجام داد؟



    بطور نمونه:

    می خوام با قرار گرفتن توی سلول B5 و اجرای ماکرو تغییرات مورد نظر بر روی جدول 1 و جدول 2 اعمال شود.
    و همچنین دفعه بعد با قرار گرفتن در سلول B21 و اجرای ماکرو جدول 3 و 4 تغییر یابد و همین طور دفعه بعد از سلول B37

    تغییراتی که می خوام روی استایل جداول اعمال شود جهت تنظیم خطوط دورادور جداول می باشد که هدف نهایی رو در شیت 2 می تونید ببیند.

    فایل پیوستی: test02

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

    با تشکر
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
    پاسخ مورد نظر براي اين تاپيك ارسال شده است.
    ویرایش توسط mahvar01 : 2014/10/31 در ساعت 17:26

  2.  

  3. #2


    آخرین بازدید
    2023/08/14
    تاریخ عضویت
    March 2010
    محل سکونت
    تهران
    نوشته ها
    2,034
    امتیاز
    4508
    سپاس
    2,467
    سپاس شده
    4,096 در 1,241 پست
    سطح اکسل
    85.00 %

    khakzad به Yahoo ارسال پیام
    سلام
    بله راه وجود داره
    اصولا برای انجام کارهای تکراری از ضبط ماکرو استفاده می کنیم
    بهترین راه اینه که یک نمونه جدول با استایل مورد نظر اماده کنید
    بعد با ضبط ماکرو، فرمت رو انتقال بدید
    بعد می تونید کد ها رو ببینید و ویرایش کنید

  4. سپاس ها (2)


  5. #3


    آخرین بازدید
    2023/08/14
    تاریخ عضویت
    March 2010
    محل سکونت
    تهران
    نوشته ها
    2,034
    امتیاز
    4508
    سپاس
    2,467
    سپاس شده
    4,096 در 1,241 پست
    سطح اکسل
    85.00 %

    khakzad به Yahoo ارسال پیام
    من به این شکل یک ماکروی ضبط شده رو ویرایش کردم
    کد:
    Sub Macro1()
    
        Selection.Copy
        Sheet2.Activate
        j = 2
      30  For i = 0 To 12
            Cells(5 + (16 * i), j).Select
            Selection.PasteSpecial Paste:=xlPasteFormats
        Next i
        If j = 8 Then Exit Sub
        j = 8
        GoTo 30
    End Sub
    کاری که باید بکنید اینه که محدوده ای که می خواید استایلش کپی بشه رو انتخاب کنید
    بعد ماکرو را اجرا کنید
    میره توی شیت و روی همه جداول اعمال میشه

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

    سوالی بود در خدمتم
    موفق باشید

  6. سپاس ها (2)


  7. #4


    آخرین بازدید
    2019/08/24
    تاریخ عضویت
    October 2014
    محل سکونت
    بوشهر
    نوشته ها
    26
    امتیاز
    24
    سپاس
    20
    سپاس شده
    14 در 10 پست
    تعیین سطح نشده است

    ممنون از راهنمایی خوب تون.

  8. سپاس ها (1)



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

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

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

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

  1. تغییرات باحرکت موس روی لیبل،تکست باکس یاغیره
    توسط حسینعلی در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 2
    آخرين نوشته: 2014/07/20, 14:25
  2. تشخیص اعداد مساوی از غیر مساوی
    توسط مجید در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 1
    آخرين نوشته: 2014/01/27, 21:33
  3. پاسخ ها: 0
    آخرين نوشته: 2012/11/22, 13:16
  4. تغییر رنگ Textbox به محض تغییر محتوای ان
    توسط Nima در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 2
    آخرين نوشته: 2012/06/25, 18:32

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

اکسل ماکرو جداول

کلمات کلیدی این موضوع

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

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

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