فریدون پورسمیعی:
اولین دوره آموزشی کوتاه مدت به روش الکترونیکی (e-learning)با عنوان "بهره وری" با 24 فراگیر در روز سه شنبه 24/7/86 در واحد آموزشی گیلان اجرا می شود.
فراگیران، پیش از آغاز دوره در یک نشست توجیهی، با نحوه کاربری سیستم آموزش الکترونیکی ، در واحد آموزشی گیلان آشنا می‌شوند.
لطفا روی عنوان مورد نظر در مطالب زیر کلیک نمایید.
ایجاد: علیزاده
ارسال: عباس اسماعیلی راد
منو: : نشریه آموزش - آموزشی و دانشجویی
منبع: معاونت توسعه مدیریت و سرمایه انسانی ریاست جمهوری (سازمان مدیریت و برنامه‌ریزی کشور سابق)
ماکرو در اکسل- بخش پنجم: نوشتن یک ماکرو
ایجاد: علیرضا قراباغی
ارسال: اسماعیل میرزایی
منو: پژوهش و فناوری - کتابخانه دیجیتال
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
سومین شماره خبرنامه شبنم منتشر شد.
ایجاد: علیرضا قراباغی
ارسال: علیرضا قراباغی
منو: پژوهش و فناوری - رویدادها
منبع: دفتر امور پژوهشی و پشتیبانی علمی شرکت سهامی مدیریت منابع آب ایران
فراخوان مقاله سومین سمپوزیوم بین المللی محیط زیست
ایجاد: علیرضا قراباغی
ارسال: مهرداد فرهادیان
منو: پژوهش و فناوری - کنفرانسها و کارگاههای علمی
منبع: The Department of Chemical Engineering of the National Technical University of Athens
ششمین کنفرانس دانشجویی مهندسی معدن ایران
ایجاد: علیرضا قراباغی
ارسال: علیرضا قراباغی
منو: پژوهش و فناوری - کنفرانس ها و کارگاه های علمی
منبع: سایت کنفرانس
همایش فناوری آموزشی در عصر اطلاعات و ارتباطات
ایجاد: کورش عزیزیها
ارسال: کورش عزیزیها
منو: پژوهش و فناوری - کنفرانس ها و کارگاه های علمی
منبع: دانشگاه چمران
اولین کنفرانس بین المللی شهر الکترونیک
ایجاد: کورش عزیزیها
ارسال: کورش عزیزیها
منو: پژوهش و فناوری - کنفرانس ها و کارگاه های علمی
منبع: سایت کنفرانس
مصوبه دولت براى واگذارى ۲۵ شرکت دولتى
ایجاد: غلامرضا علی اکبری
ارسال: کورش عزیزیها
منو: نشریه آموزش - گوناگون
منبع: خبرگزاری مهر
مراسم عزاداری شهادت حضرت علی (ع) در واحد مازندران
ایجاد: غلامرضا علی اکبری
ارسال: محمدرضا حسن پور
منو: نشریه - فرهنگی و ورزشی
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
اخبار و گزارشات هفته بیست و سوم - منتهی به بیستم مهرماه
ایجاد: علیرضا قراباغی
ارسال: علیرضا قراباغی
منو: پژوهش و فناوری - نامه هفته
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
اسماعیل میرزایی:
در بخش اول توضیح داده شد که برای ایجاد ماکرو دو روش وجود دارد، روش اول ضبط ماکرو که توضیح داده شد و روش دوم نوشتن کد برنامه در محیط VB که در این بخش با یک مثال توضیح داده میشود.
یک فایل جدید excel بنام test1 ایجاد نمایید. در سلولهای A1 تا A10 نام کوچک ده نفر و در سلولهای B1 تاB10 نام خانوادگی آن ده نفر را وارد نمایید. به محیط VB بروید. در پنجره project window پس از دابل کلیک برروی VBAProject(test1.xls) از منوی باز شده گزینه Insert و سپس زیر منوی module را انتخاب کنید. با این ترتیب در پنجره code window مدول جدید ایجاد میشود. در مدول ایجاد شده عبارت SubProtest1() را تایپ و دکمه enter را فشار دهید.عبارت End sub در خط بعد ظاهر میشود.بین این دو عبارت برنامه زیر را تایپ کنید:
Sheet1.Select
Range("C1").Select
Do Until Selection.Offset(0, -2).Value = " "
Selection.Value = Selection.Offset(0, -2).Value & " " & Selection.Offset(0, -1)
Selection.Offset(1, 0).Select
Range("A1").Select
به محیط excel برگشته و ماکروی فوق را اجرا نمایید. در نتیجه اجرای ماکروی فوق، در سلولهای C1 تا C10 ترکیب نام و نام خانوادگی هر فرد درج شده است.
توضیح برنامه:
خط اول بمعنی انتخاب sheet1 از فایل مورد نظر و خط دوم انتخاب سلول C1 میباشد. خطوط سوم تا ششم دستورات ایجاد حلقه است که شرط پایان حلقه در خط سوم تعریف شده (تا زمانیکه ممحتوای سلولی که بفاصله دو سلول سمت چپ سلول انتخاب شده است (یعنی سلول A1 ) تهی نباشد حلقه ادامه پیدا کند.) خطوط چهارم و پنجم بدنه حلقه میباشد. خط چهارم یک دستور انتساب است که بر اساس آن محتوای سلول انتخاب شده برابر است بامحتوای سلول دوم از سمت چپ سلول انتخاب شده ، یک فاصله خالی(" " ) و محتوای سلول اول از سمت چپ سلول انتخاب شده . خط پنجم دستور رفتن از سلول انتخاب شده به یک سلول پایین تر ودستور آخر انتخاب سلول A1 پس از اتمام حلقه میباشد.