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

🖤 پیام تسلیت

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

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

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


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

کپی شیتی در فایل اکسل دیگر

Collapse
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • fimani119

    • 2018/11/10
    • 27
    • 29.00

    پرسش کپی شیتی در فایل اکسل دیگر

    دوستان سلام
    یک فایل صورتجلسه تنظیم کردم که در تاریخ های مختلف باید فیلدهاش پر بشن، میخوام هر سری که صورتجلسه جدیدی تنظیم میشه با زدن یک دکمه از صورتجلسه قبلی در یک فایل اکسل دیگه کپی ایجاد بشه مشکلم اینه که اندازه ستون ها و ردیف ها با دستور کپی و پیست انتقال داده نمیشن. ممنون میشم راهنمایی کنید.
    با تشکر
    Last edited by fimani119; 2020/09/20, 11:03.
  • mrhartsclube

    • 2017/11/15
    • 130
    • 81.00

    #2
    سلام دوست عزیز
    برای کپی کردن یک شیت (توی این مثال Sheet1) داخل همون فایل مثلا بعد از شیت 3 از کد زیر استفاده کنید:

    کد PHP:
    Worksheets("Sheet1").Copy After:=Worksheets("Sheet3"
    برای کپی کردن Sheet1 توی یه فایل جدید و Save کردنش توی درایو C به اسم New1 از کد زیر استفاده کنید:

    کد PHP:
    Worksheets("Sheet1").Copy
    With ActiveWorkbook
          
    .SaveAs Filename:="C:\New1.xlsx"FileFormat:=xlOpenXMLWorkbook
         
    .Close SaveChanges:=False
    End With 
    برای کپی کردن چندتا شیت (مثلا شیت 1 و 2 و 4) توی یه فایل جدید فقط خط اول کد بالا رو به کد زیر تغییر بدین:

    کد PHP:
    Worksheets(Array("Sheet1""Sheet2""Sheet4")).Copy 
    امیدوارو جواب سوالتون رو گرفته باشین
    [CENTER][COLOR=#696969][FONT=lucida console]... [B]Programming [/B]C# - VB.Net - VC++ - ASP.Net - HTML - CSS - JS - AS2 - AutoIt - Pascal - Delphi - PHP - Python - VBA - Etc
    [/FONT][/COLOR][SIZE=2][FONT=lucida console][COLOR=#808080]... 2D & 3D [B]Graphic Designer[/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] 2D & 3D [B]Animator [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Game [/B]Designer & [B]Hacker [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] Data [B]Forensic [/B]Expert [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Ethical [/B]Hacker [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Pen[/B] Tester

    [/COLOR][/FONT][/SIZE][COLOR=#ff0000][FONT=courier new][SIZE=4][B].: Expert in doing what nobody else can :.[/B][/SIZE][/FONT][/COLOR][/CENTER]

    کامنت

    چند لحظه..