مرحوم محمد محمدی

🖤 پیام تسلیت

با نهایت تأسف و تأثر، باخبر شدیم جناب آقای محمد محمدی با نام کاربری smartman ، از مدیران ارزشمند انجمن اکسل ایران، دار فانی را وداع گفته‌اند.

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

مدیریت و اعضای انجمن ExcelIran این ضایعه را به خانواده محترم ایشان، دوستان و تمامی اعضای انجمن تسلیت عرض نموده و از خداوند متعال برای آن مرحوم، رحمت و مغفرت الهی و برای بازماندگان صبر و شکیبایی مسئلت دارند.

انا لله و انا الیه راجعون

استفاده از اطلاعات ثابت در ایجاد برگه های جدید

Collapse
این تاپیک قفل است.
X
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • Masih60

    • 2015/11/24
    • 37
    • 40.00
    #1

    [حل شده] استفاده از اطلاعات ثابت در ایجاد برگه های جدید

    سلام،

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

      • 2013/09/29
      • 2065
      • 72.00
      #2
      نوشته اصلی توسط Masih60
      سلام،
      دوستان عزیز آیا روشی وجود داره که یه سری اطلاعات ثابت بطور خودکار به شیتهای جدید اضافه بشه؟ یجور حالت Template که بدون اینکه نیاز باشه اطلاعات قبلی کپی بشه، در صورتیکه شیت جدید ایجاد شد بطور خودکار در این شیت قرارداده بشه.
      سلام
      اینکار از طریق کدنویسی در محیط       VBA امکان پذیره.

      فرض کنید شیت مورد نظر شما       sheet1 باشه ،

      با نوشتن کد زیر می توان پس از ایجاد شیت جدید از       sheet1 یک کپی با فرمت های همان شیت ایجاد نمود.

      فقط دقت کنید که هر تغییراتی که در       sheet1 اعمال کنید در شیت جدید نیز اعمال می شود. یعنی شیت1 بعنوان شیت مادر ( یا همان Template ) در نظر گرفته می شود.

      موفق باشید.
      کد PHP:
      Private Sub Workbook_NewSheet(ByVal Sh As Object)
      Sheets("Sheet1").Copy After:=Sheets(1)
      Application.DisplayAlerts = False
      Sh      .Delete
      End Sub 
      فایل های پیوست شده
      [CENTER][B][SIZE=5][COLOR=#006600][FONT=georgia][COLOR=#800000]!With [/COLOR][/FONT][/COLOR][COLOR=#006600][FONT=georgia]God [/FONT][/COLOR][COLOR=#006600][FONT=georgia][COLOR=#800000]all [/COLOR][/FONT][/COLOR][COLOR=#800000][FONT=georgia]things are [/FONT][/COLOR][COLOR=#006600][FONT=georgia]possible[/FONT][/COLOR][/SIZE][/B][B][FONT=Tahoma]
      [/FONT][/B][/CENTER]
      [CENTER][B][FONT=Tahoma] [IMG]http://forum.exceliran.com/attachment.php?attachmentid=5334&d=1419428336[/IMG]
      [/FONT][/B][SIZE=1][FONT=Tahoma][B][FONT=Tahoma]
      [/FONT][/B][/FONT][/SIZE]
      [/CENTER]

        کامنت

        • Masih60

          • 2015/11/24
          • 37
          • 40.00
          #3
          نوشته اصلی توسط حسام بحرانی
          سلام
          اینکار از طریق کدنویسی در محیط           VBA امکان پذیره.

          فرض کنید شیت مورد نظر شما           sheet1 باشه ،

          با نوشتن کد زیر می توان پس از ایجاد شیت جدید از           sheet1 یک کپی با فرمت های همان شیت ایجاد نمود.

          فقط دقت کنید که هر تغییراتی که در           sheet1 اعمال کنید در شیت جدید نیز اعمال می شود. یعنی شیت1 بعنوان شیت مادر ( یا همان Template ) در نظر گرفته می شود.

          موفق باشید.
          کد PHP:
          Private Sub Workbook_NewSheet(ByVal Sh As Object)
          Sheets("Sheet1").Copy After:=Sheets(1)
          Application.DisplayAlerts = False
          Sh          .Delete
          End Sub 
          بله، از طریق کدنویسی میتونم انجام بدم ولی گفتم شاید روشی بجز کدنویسی داشته باشه که کاربر نخواد ماکرو ایجاد کنه .

            کامنت

            • Amir Ghasemiyan

              • 2013/09/20
              • 4600
              • 100.00
              #4
              نوشته اصلی توسط Masih60
              سلام،

              دوستان عزیز آیا روشی وجود داره که یه سری اطلاعات ثابت بطور خودکار به شیتهای جدید اضافه بشه؟ یجور حالت Template که بدون اینکه نیاز باشه اطلاعات قبلی کپی بشه، در صورتیکه شیت جدید ایجاد شد بطور خودکار در این شیت قرارداده بشه.
              سلام دوست عزيز
              يك راه ديگه علاوه بر روشي كه حسام جان گفتن اينه كه يك تمپليت ايجاد كنيد و موقع ايجاد شيت اون تمپليت رو فراخواني كنيد. يعني روي يك شيت راست كليك كنيد و گزينه insert رو بزنيد. در پنجره اي كه باز ميشه اون تمپليت مورد نظرتون رو انتخاب كنيد

                کامنت

                قبلی template بعدی
                چند لحظه..