اکسلعمومی

پرش به اولین سلول خالی از ستون دلخواه در اکسل با یک کلیک

پرش به اولین سلول خالی از ستون دلخواه در اکسل با یک کلیک

 

پرش به اولین سلول خالی در اکسل چه کاربردی داره ؟

فرض کنید دیتای حجیمی دارید که هر روز و در ساعتهای مختلف باید دیتای جدید بهش اضافه کنید ، یک راه اینه که به ستون دلخواه برید و با زدن کلیدهای Ctrl ArrowDown ( کلید کنترل را نگه داشته و فلش رو به پائین کیبورد را بزنید ) و به آخرین سلول ستون جاری انتقال پیدا کنید و به این ترتیب یک سط پائین تر میشه اولین سلول خالی فایل شما تو ستون انتخابی .

اما راه دیگه ای وجود داره که خیلی سرع تر و البته حرفه ای تر هست و اون هم استفاده از کد نویسی و یا ایجاد ماکرو هست .

پرش به اولین سلول خالی اکسلپرش به اولین سلول خالی اکسل

برای استفاده از ماکرو برای پرش به اولین سلول خالی اکسل مراحل زیر را انجام دهید .

از منوی بالای اکسل و تب Insert یکی از Shape ها رو به دلخواه انتخاب کنید و در قسمت دلخواه شیت خودتون قرار بدین .

انتخاب Shape دلخواه اکسلانتخاب Shape دلخواه اکسل

روی Shape ایجاد شده راست کلیک کنید و گزینه Assign Macro رو انتخاب کنید .

اولین سلول خالی در اکسلاولین سلول خالی در اکسل

از پنجره ای که مثل تصویر زیر باز میشه گزینه New رو انتخاب میکنید که وارد محیط کد نویسی میشه .

ایجاد ماکرو جدید در اکسلایجاد ماکرو جدید در اکسل

حالا کد زیر رو کپی کنید و در قسمت خالی آماده کدنویسی قرار بدین .

Dim ws As Worksheet
Set ws = Activesheet
For Each cell In ws.Columns(1).Cells
If IsEmpty(cell) = True Then cell.Select: Exit For
Next cell

کد بالا باعث میشه که هر وقت روی Shape کلیک کنید به اولین سلول خالی ستون اول از شیت جاری منتقل بشید ، حالا یه سوال پیش میاد که اگه خواستیم به عنوان مثال به اولین سلول خالی ستون دوم از شیت دیگه ای پرش کنیم چکار باید کنیم .

جواب خیلی سادست کد بالا رو به شکل زیر تغییر میدید.

Dim ws As Worksheet
Set ws = Sheets(“Sheet2”)
For Each cell In ws.Columns(2).Cells
If IsEmpty(cell) = True Then cell.Select: Exit For
Next cell

حالا این کد باعث میشه که کاربر به اولین سلول خالی از ستون B توی Sheet2 هدایت بشه که با تغییر نام دادن Sheet2 به نام دلخواه میتونید کد رو تغییر بدین.

 


(1) در اکسل 2016 Excel 2016
حرکت به اولین سلول سطر در صفحه کاربرگ Worksheet در اکسل 2016 Excel 2016 - آموزش 365


(2) ده ترفند اکسل با موس و کیبورد سریعتر
ده ترفند اکسل با موس و کیبورد سریعتر از همیشه کار کنید فرساران


(3) اکسل و ترفندهای نکات خالصه
اکسل و ترفندهای نکات خالصه


(4) در اکسل 2016 Excel 2016
انتقال به آخرین سطر جدول Table در اکسل 2016 Excel 2016 - آموزش 365


(5) حذف سلول های خالی در اکسل حذف سطرهای
حذف سلول های خالی در اکسل حذف سطرهای خالی گروه تخصصی اکسل پدیا


(6) آدرس دهی سلول ها قواعد فرمول نویسی
آدرس دهی سلول ها قواعد فرمول نویسی حرفه ای در اکسل قسمت دوم


(7) 58 ترفند اکسل برای افزایش سرعت کار
58 ترفند اکسل برای افزایش سرعت کار


(8) رنگی کردن یکی در میان سطرها یا ستون ها
رنگی کردن یکی در میان سطرها یا ستون ها خانه اکسل


(9) جستجو سرچ و جایگزینی در اکسل - اکسلیوتی
جستجو سرچ و جایگزینی در اکسل - اکسلیوتی

دیدگاهتان را بنویسید

نشانی ایمیل شما منتشر نخواهد شد. بخش‌های موردنیاز علامت‌گذاری شده‌اند *

7 + 10 =

دکمه بازگشت به بالا