۰۶ مرداد ۱۳۸۷

اکسل یاد می‌گیرم: تغییر جهت حرکت در سلول‌ها

چون با اکسل خیلی سر و کار دارم -اما خب، رسما هیچی بلد نیستم متاسفانه- و به خاطر کارم، مجبورم اعداد زیادی را در کاربرگ‌ها مختلفی با جهت‌های مختلف وارد کنم، یکی از معضلات‌ام شده تغییر جهت در سلول‌ها بعد از تقه زدن روی Enter.

» راه اول:
در اکسل 2007 در Excel Option و در advanced می‌توانید جهت حرکت در سلول‌ها را بعد از Enter تغییر دهید، مثل تصویر زیر.

after-return-in-excel-2007 

» راه دوم:
در حالت پیش‌فرض با تقه‌ زدن روی Enter، به سلول پایین و با زدن Tab به سمت راست می‌روید.

» راه حل بهتر:
استفاده از ماکرو. خب، وقتی در طی روز بارها و بارها مجبور شوی بروی در Option تغییر موضع بدهی، اولین نتیجه‌اش کلافه‌گی‌ست. ابتدا در همان Excel Option برگه‌ی Developer را فعال کنید، تصویر زیر کمک‌تان می‌کند.

show-the-developer-tab-in-ribbon

دو تا ماکرو ساده ایجاد می‌کنم. فرض کنید جهت پیش‌فرض را تغییر نداده‌ام؛ بالا به پایین. یک ماکرو ضبط می‌کنم به نام DirectToRight و میانبری هم برایش تعیین می‌کنم؛ مثلا Ctrl+Shift+R. وقتی ضبط ماکرو شروع می‌شود، در Excel Option و در Advanced جهت را به سمت راست تغییر می‌دهم و پس از بستن Option، ماکرو را هم متوقف می‌کنم.

برای جهت بالا به پایین هم یک ماکرو به نام DirectToDown ضبط می‌کنم. از این به بعد، برای تغییر جهت به راست از ترکیب Ctrl+Shift+R و برای تغییر جهت به پایین از ترکیب Ctrl+Shift+D استفاده می‌کنم، یا اگر میانبری تعریف نکرده‌ام با ترکیب ALt+F8 پنجره‌ی ماکروها را باز می‌کنم و ماکرو مورد نظر را انتخاب و اجرا می‌کنم. کدهای نهایی چیزی‌ست شبیه به چند خط پایین، نکته‌اش این است که لزوما نباید به برنامه‌نویسی -در نرم‌افزارهای خانواده‌ی آفیس- تسلط داشته باشید تا امورات‌تان بگذرد، درباره‌ی این موضوع و کتابی که این روزها می‌خوانم بیشتر می‌نویسم.

Sub DirectToDown()
' DirectToDown Macro
Application.MoveAfterReturnDirection = xlDown
End Sub

Sub DirectToRight()
' DirectToRight Macro
Application.MoveAfterReturnDirection = xlToRight
End Sub