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

Collapse
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • shirsalimian
    • 2017/12/31
    • 4
    • 22.00

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

    دوستان عزیز سلام
    اگه کسی من رو می تونه در این زمینه کمک و راهنمایی کنه ممنون می شم
    من یک فایل اکسل دارم حاوی 120 شیت که مربوط به یک سری اطلاعات فروش کالا به مشتری هست. می خوام به صورت اتوماتیک فرضا سلول a1 را از همه سلولها کپی کنه و در شیت 121 به صورت عمودی و زیر هم قرار بده
    پیشاپیش از لطف شما دوستان عزیز کمال قدردانی و تشکر رو دارم
  • مصطفی رجبی

    • 2015/05/24
    • 73
    • 47.00

    #2
    نوشته اصلی توسط shirsalimian
    دوستان عزیز سلام
    اگه کسی من رو می تونه در این زمینه کمک و راهنمایی کنه ممنون می شم
    من یک فایل اکسل دارم حاوی 120 شیت که مربوط به یک سری اطلاعات فروش کالا به مشتری هست. می خوام به صورت اتوماتیک فرضا سلول a1 را از همه سلولها کپی کنه و در شیت 121 به صورت عمودی و زیر هم قرار بده
    پیشاپیش از لطف شما دوستان عزیز کمال قدردانی و تشکر رو دارم
    با سلام
    در فایل پیوست کد vb نمونه رو نوشتم یه نگاه بندازید کمکتون میکنه.
    فایل های پیوست شده

    کامنت

    • shirsalimian
      • 2017/12/31
      • 4
      • 22.00

      #3
      دوست عزیز سلام ممنون از لطفتون
      1. جسارتا من در زمینه کدهای vb و برنامه نویسی اکسل اطلاعات چندانی ندارم می شه در مورد نحوه استفاده از فایل ارسالی جسارتا راهنمایی بفرمایید

      کامنت

      • مصطفی رجبی

        • 2015/05/24
        • 73
        • 47.00

        #4
        نوشته اصلی توسط shirsalimian
        دوست عزیز سلام ممنون از لطفتون
        1. جسارتا من در زمینه کدهای vb و برنامه نویسی اکسل اطلاعات چندانی ندارم می شه در مورد نحوه استفاده از فایل ارسالی جسارتا راهنمایی بفرمایید
        با سلام
        در فایل ارسالی تعداد 8 شیت وجود دارد. در شیت 8 با کلیک کردن دکمه 1 command button محتوای سلول A1 در شیتهای 1 تا 7 به شیت 8 کپی میشود.

        کامنت

        • shirsalimian
          • 2017/12/31
          • 4
          • 22.00

          #5
          دوست عزیزم سلام ممنون از لطفتون این مورد رو متوجه شدم
          می خوام بدونم چه جوری برای فایل اکسل خودم که شامل 120 شیت هست از این فایل ارسالی می تونم کمک بگیرم دستوراتش رو باید از کچا کپی و پیست کنم و چه تغییراتی در اون بدم

          کامنت

          • مصطفی رجبی

            • 2015/05/24
            • 73
            • 47.00

            #6
            نوشته اصلی توسط shirsalimian
            دوست عزیزم سلام ممنون از لطفتون این مورد رو متوجه شدم
            می خوام بدونم چه جوری برای فایل اکسل خودم که شامل 120 شیت هست از این فایل ارسالی می تونم کمک بگیرم دستوراتش رو باید از کچا کپی و پیست کنم و چه تغییراتی در اون بدم
            با سلام
            کد نوشته شده را از مسیر 1 مشاهده کنید.
            مسیر1 : تب Developer- گزینه Design Mode را فعال کنید. سپس رو دکمه
            1 command button دو بار کلیک کنید. پنجره کد VB باز میشود.
            حال اگر شما 120 شیت دارید و میخواهید اطلاعات سلول A1 در شیت 121 کپی شود کافیست بجای
            ("
            Sheets("8 بنویسید("Sheets("121.
            نکته دیگر اینکه شیت 121 از نظر ترتیب قرار گیری شیتها در فایل اکسل آخرین شیت باشد. یعنی بعد از شیت 119و120 شیت آخر 121 قرار بگیرد.

            کامنت

            چند لحظه..