ایراد گرفتن در هنگام اجرای ماکرو

[reza_1001]

سلام خدمت اساتید و دوستان...
یه ماکرویی ضبط کردم که بعلت طولانی بودنش در هنگام اجرای ماکرو پیغام procedure too large میده .
حالا از اساتید و دوستان خواهشمندم کمک کنند .

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[~M*E*H*D*I~]

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

[reza_1001]

بله درست میفرمایید ولی بخوام توضیح کامل بدم بسیار طولانی میشه .
نمیدونم که مختصر توضیح بدم کارساز هستش یا نه ولی به هر حال توضیح مختصری میدم .
مثلا در ستون صورت باید حمل سبز بشه و یا عقرب قرمز بشه و...
همچنین در ستون منزل شرطین سبز بشه و یا دبران قرمز بشه و....
و همچنین در ستون حد مشتری و زهره سبز بشه و یا مریخ و زحل قرمز بشه و یا شمس و عطارد زرد بشه و...
و باقی ستونها به همین منوال ، که بعضیها باید سبز و بعضی قرمز و برخی زرد بشن .
البته همه اون چیزهایی که باید انجام بشه در این فایل پیوستی هست که همشون رو با conditional formating انجام داده ام

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

خوب اگر با کاندیشن کردین چرا vba
با حلقه for و if داخلش . یا حلقه و select case حله

[reza_1001]

سلام آقا امین ، با با حلقه for و if داخلش . یا حلقه و select case حله، چطوری حله لطفا راه حلش هم بفرمایید

[alieddy0]

با سلام
خدمت شما عرض کنم که ماکروی شما به حدی طولانیه که ترجمه اینکه ماکروتوم چه کاری انجام میده کار زمانبریه.از ظاهر ماکروتون میشه فهمید که فعالیتش در ستونهای مختلفه که در اونها سلولهارو بررسی میکنه و با توجه به مقدار سلول دستوری رو اجرا میکنه.شما برای بررسی سلول ها و انتخاب ستو نها میبایست از حلقه For استفاده نمایید که با دستور If شرایطتون رو بررسی کنه که این همون فرمایش آقای اسماعیلیه.اگه راجع به این نوع حلقه مشکلی دارید در تالار موارد مشابه زیاده که میتونید از اونا استفاده کنید

[reza_1001]

سلام
ممنون از راهنماییتون.
یا علی