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

🖤 پیام تسلیت

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

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

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


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

اجرای یک ماکرو در همه شیت های یک فایل اکسل

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

    • 2013/01/06
    • 109

    اجرای یک ماکرو در همه شیت های یک فایل اکسل

    سلام خدمت دوستان
    من یک ماکرو دارم که میخوام وقتی اجرا شد تمام شیت های فایل همون اکسل اجرا بشه .مممنون
  • hadi1980

    • 2019/01/07
    • 237
    • 86.00

    #2
    سلام
    کافيه يه لوپ روي شيتها بنويسيد
    مثلا اينجوري
    کد:
     
    DimxSh AsWorksheet[COLOR=#0A0101][FONT=Consolas]
    Application.ScreenUpdating = False[/FONT][/COLOR]
    [COLOR=#0A0101][FONT=Consolas]    For Each xSh In Worksheets[/FONT][/COLOR]
    [COLOR=#0A0101][FONT=Consolas]        xSh.Select[/FONT][/COLOR]
    [COLOR=#0A0101][FONT=Consolas]        Call RunCode[/FONT][/COLOR]
    [COLOR=#0A0101][FONT=Consolas]    Next[/FONT][/COLOR]
     Application.ScreenUpdating = True

    کامنت

    چند لحظه..