جستجو

ترفندهای کامپیوتری

حضرت علی (ع): «زَکوةُ العِلمِ نَشرُهُ؛ زکات علم نشر آن است».
وبلاگ "ترفندها" (سایت پی‌سی‌ترفند) برای عمل به این حدیث شریف و با هدف ارتقاء دانش و مهارت‌های مرتبط با رایانه در ۳۰ مهرماه ۱۳۹۱ ایجاد شده است. به امید آنکه مفید واقع شود.
🔵 کانال‌ پی‌سی‌ترفند در تلگرام:
telegram.me/pctarfandir
🔵 ارتباط با ادمین:
telegram.me/pctarfand_admin

خلاصه آمار

تبليغات

ادغام چند فایل یا چند شیت اکسل + ماکرو

اکسل ماکرونویسی

ادغام چند فایل یا چند شیت اکسل + ماکرو

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

چند فایل یا چند شیت اکسل را می‌توان بصورت دستی ادغام کرد. اما اگر تعداد این فایل‌ها یا شیت‌ها زیاد باشد ادغام دستی بسیار زمان‌بر و خسته کننده خواهد بود. برای همین بهتر است از روش‌های خودکار یعنی ماکرونویسی و استفاده از افزونه‌های اکسل استفاده کنید.

روش ۱- ماکرونویسی:

الف) ادغام چند شیت اکسل در یک شیت:

پس از دانلود فایل فوق، اگر امکان انتقال شیت‌ها به این فایل وجود دارد پس از انتقال، روی دکمه اجرای ماکروی ۱ کلیک کنید. اگر امکان انتقال وجود ندارد در فایلی که می‌خواهید شیت‌های آن را ادغام کنید کلیدهای Ctrl+R را بفشارید تا کد اجرا شود و شیت‌های مختلف در شیت جدیدی با نام Combined با هم ادغام شوند مشابه آنچه در تصویر اول نشان داده شده است.

برای اجرای صحیح کد باید به چند نکته دقت کرد:

۱- برای اینکه کد ماکرو اجرا شود باید فایل Macro tarfand 280 (pctarfand.ir) که دانلود کردید باز باشد.

۲- اطلاعات باید از سلول A1 شروع شود، اگر این طور نباشد کد هیچ تاثیری نمی‌گذارد.

۳- اطلاعات باید دارای ساختار یکسانی باشند.

۴- این کد فقط شیت‌های فایل فعال را ادغام می‌کند، اگر می‌خواهید شیت‌های چند فایل اکسل را با هم ادغام کنید از کد ماکروی بعد استفاده کنید.

منبع: extendoffice.com

ب) ادغام چند فایل اکسل در یک فایل

برای ادغام چند فایل، ابتدا در درایو C پوشه‌ای به نام combine بسازید و فایل‌هایی که می‌خواهید با هم ادغام شوند را درون آن کپی کنید. سپس فایل اکسلی که دانلود کردید را باز کنید و مطابق راهنمای درون فایل، روی دکمه اجرای ماکروی ۲ کلیک کنید تا کد اجرا شود و فایل‌های قرار داده شده در پوشه به آدرس زیر با هم ادغام شوند.

C:\combine\

در پایان می‌توانید فایل مجموعه شیت‌ها را با نام جدید ذخیره کنید.

منبع: extendoffice.com


روش ۲- نصب افزونه

- افزونه RDBMerge Add-in

با نصب این افزونه رایگان در اکسل شما قادر خواهید بود که محتویات شیت‌های مختلف یک فایل اکسل و حتی محتویات چند فایل‌ اکسل را با هم ادغام نمایید.

برای نصب این افزونه کافیست پس از دانلود از این سایت و سپس استخراج آن، در پنجره تنظیمات اکسل وارد بخش Add-Ins شوید و در قسمت پایین پس از انتخاب گزینه Excel Add-Ins در بخش Manage روی دکمه Go کلیک کنید. در پنجره Add-Ins روی دکمه Browse کلیک کنید و فایل افزونه را انتخاب نموده و روی دکمه Ok کلیک کنید. پس از اضافه کردن افزونه، در تب Data دکمه جدیدی با نام RDBMerge Add-in به اکسل اضافه می‌شود. با کلیک روی این دکمه پنجره زیر باز می‌شود.

برای استفاده از این افزونه، ابتدا فایلی که می‌خواهید شیت‌های آن با هم ادغام شوند را درون یک پوشه قرار دهید و یا اگر می‌خواهید چند فایل را با هم ادغام کنید آن‌ها را درون یک پوشه قرار دهید و سپس با استفاده از دکمه Browse، آن پوشه را انتخاب کنید. سایر مراحل کار در سایت افزونه توضیح داده شده است.

این افزونه توسط سایت سونار وب فارسی شده است البته رایگان نمی‌باشد.

 

- افزونه Kutools

برای دانلود و آموزش نحوه استفاده از این افزونه به این آدرس (ادغام چند شیت) و این آدرس (ادغام چند فایل) مراجعه کنید.

 

برای مطلع شدن از جدیدترین مطالب سایت، کانال‌ پی‌سی‌ترفند در تلگرام را با آی‌دی pctarfandir@ دنبال کنید:

          

سوالات خود در زمینه ورد و اکسل و ... را می‌توانید از طریق ایمیل و تلگرام با ما مطرح کنید.

آدرس ایمیل: tarfandha.blog@gmail.com

آی‌دی تلگرام: pctarfand_admin@

نظرات (۱۹)

  1. ممنون بابت کد تان
    لطفا اگر ممکن است کد زیر را طوری اصلاح کنین که اطلاعات شیت بعدی را از سطر اول و در اولین ستون موجود کپی کند
    یعنی می خام مثلا داده های شیت 2 بجای اینکه در زیر داده های شیت 1 قرار بگیره در سمت راست اون به صورت ستونی جدید از داده ها قرار بگیره

    Sub Combine() 'pctarfand.ir & tarfandha.blog.ir'
    Dim J As Integer
    On Error Resume Next
    Sheets(1).Select
    Worksheets.Add
    Sheets(1).Name = "Combined"
    Sheets(2).Activate
    Range("A1").EntireRow.Select
    Selection.Copy Destination:=Sheets(1).Range("A1")
    For J = 2 To Sheets.Count
    Sheets(J).Activate
    Range("A1").Select
    Selection.CurrentRegion.Select
    Selection.Offset(1,0).Resize(Selection.Rows.Count - 1).Select
    Selection.Copy Destination:=Sheets(1).Range("A65536").End(xlUp)(2)
    Next
    End Sub
  2. سلام
    سایت تون عالی ، آیا می شود دو فایل را باهم ادغام کرد که این شرایط را داشته باشد. ** یک فایل فقط کد ملی و شناسنامه افراد داره و فایل دیگر کد ملی و اسم افراد آیا می توان با ادغام کردن هرسه را روبه روی هم قرار داد***
    • پاسخ:

      سلام
      اگر دو سری اطلاعات را در یک فایل قرار دهید با استفاده از تابع VLOOKUP می توانید مشکلتان را حل کنید (راهنما).
      موفق باشید.
  3. سلام..من یک فایل اکس دارم که 50تا شیت داره واطلاعات تمامی شیتا دارای ستون وردیف برابر هست وفقط مقادیر اون با هم فرق داره وقتی برنامه رو اجرا می کنم دائم خطا میده ومیگه محدوده رو اشتباه کردی ردیف من از سلول A1 شروع میشه وتا سلول I1 ادامه داره..لطفا راهنمایی کنید.
    • پاسخ:

      سلام
      دقیقا متن خطای ظاهر شده را برای من ارسال کنید.
  4. سلام. ممنون از سایت خوبتون. دوتا سوال:
    1. چطور میتونم "فقط آخرین ردیف" از چند شیت با ساختار مشابه رو در یک شیت زیر هم و در یک ستون مرتب کنم؟
    2. میخواهم عملیات بالا امکان آپدیت شدن رو داشته باشه و هر دفعه اطلاعات آخرین ردیف به شیت و ستون مرجع اضافه بشه و قبلی ها از بین نره. آیا امکانش هست؟
    • پاسخ:

      سلام
      این کارها را باید با ماکرونویسی انجام دهید. متاسفانه در این زمینه تخصص زیادی ندارم.
  5. سلام در این روش سطر ها را زیر هم قرار میدهد اگر بخواهیم ستون ها را کنار هم قرار دهیم برنامه ماکرو میتواند انجام دهد یعنی اگر شیت اول تا ستون h باشد شیت دوم را در ستون i به بعد کپی کند
    در صورت امکان جواب را ایمیل کنید
    • پاسخ:

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

      سلام
      متاسفانه دلیل مشکل را نمی دانم.
  7. سلام.من یک سوال دارم ممنون میشم کسی اگر میدونه جواب بده:
    دو یا چند تا فایل متشابه(تعداد ستون و سطر و ....)و فقط و فقط آمار عددی ستونها فرق میکنه رو چطور میتونیم در یک فایل جمع کنیم ؟
    یعنی چندتا فایل اکسل که متشابهه ستن و فقط تو مقادیر هر سلول متفاوت هستن و ک میشه علاوه بر ادغام جمع هم کرد.
    09010832605
    09330986140
    ج.ابشو تو تلگرام بفرستید ممنون میشم
    • پاسخ:

      سلام
      روش گفته شده در این مطلب را بررسی کرده اید؟
  8. ممنون خیلی به دردم خورد . توضیح اینکه من هر ماه حدود 40 تا 50 فایل اکسل ( اطلاعات تراکنشهای بانکی ) دارم که جداگانه هست و لازم داشتم که یکجا کنم . خیلی کارم راحتتر شد . اجرت با امام حسین.
  9. سلام
    من دو شیت اکسل که هرکدام دارای اطلاعات جداگانه هستن را می خواستم با هم تلفیق کنم از روش هایی که گفتین استفاده کردم و تمام کدها رو نیز وارد کردم ولی همش پیغام خطا میده اگه راهی داره ممنون میشم راهنمایی کنید .
    درصورت امکان پاسخ را به ایمیلم ارسال نمائید.
    • پاسخ:

      سلام
      چه پیغام خطایی می‌دهد؟
  10. سلام مجدد

    من قدیما کمی vb بودم ولی دیگه چیزی یادم نیست. برای ماکرو نویسی حتما باید vb دانست؟

    ضمنا با این کد (کد شما) چرا بجای اینکه اطلاعات را زیر هم جمع کند در ردیفهای جلوی جداول جمع می کند؟

    ولی بهر حال با این مطلب ذهنم در این خصوص روشن شد. ممنون

    • پاسخ:

      سلام
      برای ماکرونویسی پیشرفته باید با زبان vb آشنا باشید.
      اطلاعات در شیت جداگانه ادغام می شوند.
      موفق باشید.
  11. سلام

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

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

  12. با سلام
    من یک فایل اکسل با 18000 ردیف و 1000 ستون دارم و میخوام ترانسپوز کنم. اما تعداد ستون های اکسل حدود 16800 است. چطور می ت.نم تعداد ستون های یک شیت اکسل را افزایش بدم.
    با تشکر
    • پاسخ:

      سلام
      ظاهرا این امکان وجود ندارد.
  13. سلام در مورد اکسل تحقیق می کردم خداییش هیچ سایتی اطلاعات شما رو نداره................فقط خواستم تشکر کنم ..کامل کامل
  14. سلام ،در قسمت ادغام چند فایل اکسل ،در پنجره module هیچ اطلاعاتی وجود ندارد و پنجره خالی است .
    • پاسخ:

      سلام
      باید کدهای گفته شده را در پنجره باز شده وارد کنید.
      موفق باشید.
  15. عباس قایدی

    سلام .ایا میتوان  وقتی مساحت یک زمین را بر روی گوگل ارث مشخص کردیم نقشه ان را به مپ سورس انتقال دهیم؟
    • پاسخ:

      سلام
      متاسفانه اطلاعی ندارم.

ارسال نظر

قبل از ارسال نظر به نکات زیر توجه کنید:

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

۲- قبل از مطرح کردن سوالتان، مطلب فوق را با دقت مطالعه کنید. اگر پاسخ سوالتان را پیدا نکردید در سایت جستجو کنید، ممکن است در مطلب دیگر پاسخ سوالتان را پیدا کنید.

۳- تنها به سوالاتی پاسخ داده می‌شود که از نحوه حل آن‌ها اطلاع داشته باشم.

۴- نظراتی با مضمون زیر، صرفا تایید و نمایش داده می‌شود و به آن‌ها پاسخی داده نمی‌شود.

الف) در مورد پاسخ سوال شما اطلاعی نداشته باشم،

ب) پاسخ سوال شما در مطلب فوق وجود داشته باشد.

ارسال نظر آزاد است، اما اگر قبلا در بیان ثبت نام کرده اید می توانید ابتدا وارد شوید.
شما میتوانید از این تگهای html استفاده کنید:
<b> یا <strong>، <em> یا <i>، <u>، <strike> یا <s>، <sup>، <sub>، <blockquote>، <code>، <pre>، <hr>، <br>، <p>، <a href="" title="">، <span style="">، <div align="">
تجدید کد امنیتی