رنگی شدن سلول ها بر اساس زمان

[arash44]

سلام
اگه در اكسل بخوايم چند سلول رو به ساعت نسبت بديم،بطوري كه با گذشت مثلاً هر دو ساعت يكي از سلول ها هاي لايت بشه ،آيا راهي وجود داره؟ مثلاً نام داروهاي مورد نيازم را در چند سلول بنويسم و زمان قرار دادي براشون تعريف كنم كه بعد از هر دوساعت يكي از سلول ها تحت تاثير زمان رنگي بشه. از اساتيد گرامي خواهش ميكنم اين لطف رو در حقم بكنيد و جواب اين سوال رو برايم ارسال كنيد،ممنون وسپاسگذارم.

ٍEmail:hafttapeh2000@yahoo.com

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

[Amir Ghasemiyan]

دوست عزیز لطفا برای سوالاتتون تاپیک جدید ایجاد بفرمایید
با تشکر

[amir_ts]

با سلام
کد زیر سل های تعریف شده رو با فاصله زمانی 3 ثانیه از هم به صورت رنگی نمایش میدهد.

Sub timer1()
Cells(1, 5).Interior.ColorIndex = 43
End Sub
Sub timer2()
Cells(1, 7).Interior.ColorIndex = 45
End Sub

Sub timer3()
Cells(1, 9).Interior.ColorIndex = 49
End Sub

Sub test()
Application.OnTime Now + TimeValue("00:00:03"), "timer1"
Application.OnTime Now + TimeValue("00:00:06"), "timer2"
Application.OnTime Now + TimeValue("00:00:09"), "timer3"
End Sub

[arash44]

دوست عزیز لطفا برای سوالاتتون تاپیک جدید ایجاد بفرمایید
با تشکر

از لطف شما سپاسگزارم.دوست عزيز و گرامي من تازه به جمع شما اومدم و با تنظيمات پروفايل آشنا نيستم.چطور ميتونم تاپيك بسازم؟