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

[امين اسماعيلي]

با درود
پستتون ویرایش شده ..............
خوب بریم سر اصل مطلب یه فایل آماده شده . شما مثلا چند فایل اکسل رو باز دارین و این فایل رو هم باز دارین. حالا با کلید اول شما اسم تمام فایل های اکسل به همرا شیت هاشونو دارین . کلید نمایش فرم هم فرمی رو باز میکنه که در کمبو اول لیست تمام فایل های باز و در کمبو بعد با توجه به کمبو اول لیست تمام شیت هاش این دو مورد رو انتخاب و بعد ok رو بزنین میبینین که اون اکسل و اون شیت انتخابیتون لانتخاب میشه. گزینهdelete هم اون شین از اون فایل رو پاک میکنه . فقط دقت داشته باشین که سیو هم میکنه و قابل بازگشت نیست اگر نمیخواین سیو کنه باید یه خط کد پاک بشه.

[hamidrezasadeghi]

درود بر استاد اسماعیلی
مثل همیشه سریع و با مهر و مهارت.
سوال: اگر screen Updating را غیرفعال کنیم، در زمانی که ماکرو اجرا میشود ، تعدادی صفحه باز ، بهم ریخته و البته بدون تغییر می بینیم که ممکن است دیگران به زعم اینکه کامپیوتر هنگ کرده ، آنرا ریستارت نمایند. اولا چگونه میتوان این صفحه را حداقل مرتب دید؟ ثانیا آیا میتوان پیغامی نشان داد مثلا با این مضمون که " برنامه در حال اجرا است" بدون آنکه ok بخواهد؟
ممنون از محبت تان

[امين اسماعيلي]

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

[امين اسماعيلي]

در مورد فرمان اینکه ماکرو در حال انام است میشه از status bar استفاده کرد

در ابتدای خطوط
کد زیر

Application.StatusBar = "Please wait ... calculations in progress"

ودر انتهاکد

Application.StatusBar = ""

یا

Application.StatusBar = False

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

[hamidrezasadeghi]

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

[امين اسماعيلي]

با درود
در یه تاپیک جدید اینو برسی میکنیم

[hamidrezasadeghi]

سلام استاد اسماعیلی
در شیتی که حاوی محاسبات match و index مرتبط با شیت های دیگر است، هرگاه بخواهم تغییری در سلولی بدهم مثلا ویرایش فرمول ، حتی حذف ردیف یا ستون ، اکسل شروع به محاسباتی نامعلوم میکند و پیغام Calculating 2% را نشان میدهد. ( البته درصدش زیاد میشود) که تا اتمام محاسباتش ، نمیتوان کاری روی شیت انجام داد. در نتیجه باعث اتلاف وقت میشود. چه راه حلی برای رفع این مشکل وجود دارد؟

[امين اسماعيلي]

با درود
نمیدونم الان این ایراد رو فایل منم بود یا جای دیگه.اما خوب ببین فایلت نیست اما میشه فرول های ایندکس و .... رو با vba نوشت و به یک دکمه ارتباطش داد تا در صورت اجرا کد ها اجرا بشن یعنی محاسبات. اما در مورد این مشکل میشه یه کاری کرد که شما تو ایونت change شیت enableevents محاسبات خودکار رو مثلا کنسل کنید موقت و در هنگام خار شدن از شیت اونو فعال کنید که محاسبات رو در هنگام خرو فعال کنه یا واسه یه دکمه . باید تست کنم نمیدونم .نمونه فایل بزاری بهتر میشه نظر داد

[hamidrezasadeghi]

درود بر استاد اسماعیلی
چطور میشه ایونت change شیت enableevents محاسبات خودکار رو کنسل کرد؟