PDA

توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : [حل شده] پیدا کردن تاریخ امروز در تقویم اکسل


alikhassi
2018/04/30, 14:24
سلام
یک جدول تقویم اکسل که برای یکسال برنامه ریزی شده
میخوام وقتی اکسل باز میشه با کلیک کردن بر روی یک آیکون ، روز جاری پیدا بشه
Amir Ghasemiyan
2018/04/30, 14:37
سلام
یک جدول تقویم اکسل که برای یکسال برنامه ریزی شده
میخوام وقتی اکسل باز میشه با کلیک کردن بر روی یک آیکون ، روز جاری پیدا بشه

سلام دوست عزيز
شما ميتونين تو يك سلول تاريخ روز رو بزنيد و با conditional formatting تعريف كنيد كه اگر يكي از سلول ها با تاريخ روز برابر بود رنگي كنه
alikhassi
2018/04/30, 15:07
[QUOTE=Amir Ghasemiyan;61874]سلام دوست عزيز
شما ميتونين تو يك سلول تاريخ روز رو بزنيد و با conditional formatting تعريف كنيد كه اگر يكي از سلول ها با تاريخ روز برابر بود رنگي كنه

ولی باید دنبالش بگردم
اونی که شما گفتید انجام دادم
یه ماکرو تعریف کردم که فقط اون روز جواب میده ، فرداش که ماکرو رو اجرا میکنم تاریخ قبل رو پیدا میکنه
Amir Ghasemiyan
2018/04/30, 15:49
دوست عزيز شما در كدي كه نوشتيد تاريخ يك روز خاص رو فقط گذاشتيد. بايد رفرنس بدين به سلولي كه تاريخ روز داره



Cells.Find(What:="43220", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
alikhassi
2018/05/09, 09:01
دوست عزيز شما در كدي كه نوشتيد تاريخ يك روز خاص رو فقط گذاشتيد. بايد رفرنس بدين به سلولي كه تاريخ روز داره



Cells.Find(What:="43220", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate



همینو نمیتونم
Amir Ghasemiyan
2018/05/11, 08:56
همینو نمیتونم

چرا نتونین؟ ;)

مثلا فرض کنید در سلول A1 نوشتید اون مقدار رو



t=Range("A1").Value
Cells.Find(What:= t , After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
alikhassi
2018/05/12, 10:28
دمت گرم ممنون