اسماعیل میرزایی:
در بخش اول توضیح داده شد که برای ایجاد ماکرو دو روش وجود دارد، روش اول ضبط ماکرو که توضیح داده شد و روش دوم نوشتن کد برنامه در محیط 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 پس از اتمام حلقه میباشد.
لطفا روی عنوان مورد نظر در مطالب زیر کلیک نمایید.
فراخوان سمپوزیوم بین المللی الکترونیک صنعتی
ایجاد: علیرضا قراباغی
ارسال: دکتر قلی پور
منو: پژوهش و فناوری - رویدادها
منبع: وب سایت isie2008
فراخوان فصلنامه فن آوری صنعت آب و برق
ایجاد: کورش عزیزیها
ارسال: کورش عزیزیها
منو: فصل نامه فن آوری صنعت آب وبرق - مقالات علمی
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
پذیرش مقاله دکتر حمید وارسته پور در اولین کنفرانس بین المللی آسیا و اقیانوسیه
ایجاد: غلامرضا علی اکبری
ارسال: روابط عمومی مجتمع عالی خراسان
منو: نشریه آموزش - مقالات
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
مراسم اختتامیه دوره آموزشی بدو استخدام کارکنان جدید شرکت انتقال گاز
ایجاد: غلامرضا علی اکبری
ارسال: روابط عمومی مجتمع عالی خراسان
منو: نشریه آموزش - آموزش های تخصصی
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
ایجاد: غلامرضا علی اکبری
ارسال: روابط عمومی مجتمع عالی خراسان
منو: نشریه آموزش - گوناگون
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
قانون بازنشستگی پیش از موعد کارکنان دولت ابلاغ شد
ایجاد: غلامرضا علی اکبری
ارسال: جبار گلستانی
منو: نشریه آموزش - اداری و مالی
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
اخبار و گزارشات هفته بیست و دوم - منتهی به سیزدهم مهرماه
ارسال: علیرضا قراباغی
منو: پژوهش و فناوری - نامه هفته
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
لطفا روی عنوان مورد نظر در مطالب زیر کلیک نمایید.
خواندن و نوشتن اطلاعات در ابعاد کوچک اتمی
ایجاد: علیرضا قراباغی
ارسال: دکتر افضلیان
منو: پژوهش و فناوری - رویدادها
منبع: اسپکتروم
ماکرو در اکسل- بخش چهارم: بررسی و تغییر یک ماکروی ضبط شده
ایجاد: علیرضا قراباغی
ارسال: اسماعیل میرزایی
منو: پژوهش و فناوری - کتابخانه دیجیتال
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
سیستم یادگیری الکترونیکی در پژوهشگاه نیرو
ایجاد: علیرضا قراباغی
ارسال: علیرضا قراباغی
منو: پژوهش و فناوری - رویدادها
منبع: سایت سیستم آموزش الکترونیکی پژوهشگاه نیرو
یازدهمین کنگره سراسری همکاریهای دولت، دانشگاه و صنعت برای توسعه ملی
ایجاد: علیرضا قراباغی
ارسال: صبحی بنی اردلانی
منو: پژوهش و فناوری - رویدادها
منبع: سایت کنگره
دومین کنفرانس مدیریت استراتژیک 22 و 23 آبان ماه 1386
ایجاد: کورش عزیزیها
ارسال: کورش عزیزیها
منو: پژوهش و فناوری - کنفرانسها و کارگاههای علمی
منبع: www.strategicacademy.ir
چهارمین کنفرانس مدیریت فناوری اطلاعات و ارتباطات (ICTM)
ایجاد: کورش عزیزیها
ارسال: کورش عزیزیها
منو: پژوهش و فناوری - کنفرانسها و کارگاههای علمی
منبع: WWW.ICTM.IR
دومین شماره خبرنامه الکترونیکی شبنم منتشر شد
ایجاد: علیرضا قراباغی
ارسال: علیرضا قراباغی
منو: پژوهش و فناوری - رویدادها
منبع: دفتر امور پژوهشی و پشتیبانی علمی شرکت سهامی مدیریت منابع آب ایران
سه پروژه تحقیقاتی خاتمه یافته شرکت مدیریت منابع آب ایران
ایجاد: علیرضا قراباغی
ارسال: صبحی بنی اردلانی
منو: پژوهش و فناوری - کتابخانه دیجیتال
منبع: دفتر امور پژوهشی و پشتیبانی علمی
آزمون های متمرکز استخدامی شرکت های تحت پوشش شرکت مادر تخصصی توانیر
ایجاد: غلامرضا علی اکبری
ارسال: حسین ارشدی
منو: نشریه آموزش - گوناگون
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
آزمون استخدامی شرکت برق منطقه ای مازندران و سمنان
ایجاد: غلامرضا علی اکبری
ارسال: محمدرضا حسن پور
منو: نشریه آموزش - گوناگون
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
عنوان دوره های تخصصی برگزارشده توسط گروه آب و محیط زیست واحد آموزشی مازندران
ایجاد: غلامرضا علی اکبری
ارسال: محمدرضا حسن پور
منو: نشریه آموزش - آموزش های تخصصی
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
مراسم فرهنگی در ماه مبارک رمضان
ایجاد: غلامرضا علی اکبری
ارسال: واحد مازندران
منو: نشریه آموزش - فرهنگی و ورزشی
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
جشن میلاد امام حسن مجتبی (ع) در واحد مازندران
ایجاد: غلامرضا علی اکبری
ارسال: محمدرضا حسن پور
منو: نشریه آموزش - فرهنگی و ورزشی
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
کارت ارزی بین المللی ملی تراست ( ماستر کارت )
ایجاد: غلامرضا علی اکبری
ارسال: مریم ذوالقرنیان
منو: نشریه آموزش - گوناگون
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق
اخبار و گزارشات هفته بیست و یکم - منتهی به ششم مهرماه
ارسال: علیرضا قراباغی
منو: پژوهش و فناوری - نامه هفته
منبع: موسسه آموزش عالی علمی - کاربردی صنعت آب و برق